Metrics for Spherical law of cosines

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze899.0ms (5.1%)

Memory

52.6MiB live, 2 025.1MiB 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)

sample4.8s (26.8%)

Memory

56.7MiB live, 11 053.2MiB allocated

Samples

3.6s	6 211×	1	valid
568.0ms	2 028×	0	valid
23.0ms	17×	2	valid

Precisions

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

ival-cos: 1.5s (40.4% of total)

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

ival-mult: 464.0ms (12.6% of total)

ival-acos: 336.0ms (9.1% of total)

adjust: 256.0ms (6.9% of total)

ival-sub: 136.0ms (3.7% of total)

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

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

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

Bogosity

explain371.0ms (2.1%)

Memory

19.5MiB live, 990.1MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
69	108	(-1.1791237111635103e+190 2.3359434322963538e-17 1.6133219083381884e+39 8.64951162584904e-51 -2.3682365699742878e+260)	-	`(cos.f64 (-.f64 lambda1 lambda2))`
24	3	(-3.2492105262319255e-254 -5.550485122512672e-121 -2.3054907690532906e-260 -1.9673274256336204e+281 -4.294751253711917e+158)	-	`(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	-	-	`lambda2`
0	0	-	-	`phi2`
0	0	-	-	`(*.f64 (cos.f64 phi1) (cos.f64 phi2))`
0	0	-	-	`(-.f64 lambda1 lambda2)`
0	0	-	-	`R`
0	0	-	-	`(sin.f64 phi1)`
0	0	-	-	`(cos.f64 phi2)`
0	0	-	-	`lambda1`
0	0	-	-	`(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))`
0	0	-	-	`(*.f64 (sin.f64 phi1) (sin.f64 phi2))`
0	0	-	-	`phi1`
0	0	-	-	`(sin.f64 phi2)`
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	-	-	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
0	0	-	-	`(cos.f64 phi1)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`cos.f64`	`(cos.f64 (-.f64 lambda1 lambda2))`	sensitivity	177	0
`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	27	2

Confusion

	Predicted +	Predicted -
+	88	1
-	111	56

Precision

0.44221105527638194

Recall

0.9887640449438202

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	88	1	0
-	111	1	55

Precision?

0.4427860696517413

Recall?

1.0

Freqs

test

number	freq
0	57
1	194
2	5

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

201.0ms	366×	1	valid
35.0ms	144×	0	valid
2.0ms	2×	2	valid

Compiler

Compiled 207 to 55 computations (73.4% saved)

Precisions

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

ival-cos: 82.0ms (41.6% of total)

ival-sin: 44.0ms (22.3% of total)

ival-mult: 26.0ms (13.2% of total)

ival-acos: 18.0ms (9.1% of total)

adjust: 17.0ms (8.6% of total)

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

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

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

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

preprocess238.0ms (1.3%)

Memory

-5.5MiB live, 74.4MiB 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.4MiB live, 0.4MiB allocated
Compiler: Compiled 0 to 5 computations (-∞% saved)

prune1.0ms (0%)

Memory

1.6MiB live, 1.6MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	73.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)

simplify9.0ms (0%)

Memory

-25.4MiB live, 14.1MiB 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

localize141.0ms (0.8%)

Memory

-3.7MiB live, 355.6MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.17578125	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	0.20703125	(.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.95660718509512	(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.63765422103654	(cos.f64 (-.f64 lambda1 lambda2))

Samples

107.0ms	183×	1	valid
18.0ms	72×	0	valid
1.0ms	1×	2	valid

Compiler

Compiled 94 to 19 computations (79.8% saved)

Precisions

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

ival-cos: 39.0ms (39% of total)

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

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

ival-acos: 10.0ms (10% of total)

adjust: 7.0ms (7% of total)

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

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

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

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

series42.0ms (0.2%)

Memory

32.2MiB live, 111.7MiB allocated

Counts

6 → 252

Calls

Call 1

Inputs
#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())

Outputs
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi1) (cos phi2))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
6.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	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))))
3.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))))
2.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))))

simplify205.0ms (1.2%)

Memory

-23.8MiB live, 328.5MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	219	4017
1	686	3929
2	2188	3840
3	3633	3804
0	8012	3588

Stop Event

1×	iter limit
1×	node limit

Counts

252 → 252

Calls

Call 1

Inputs
(+ (* (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 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))))
(* (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 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)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))

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

rewrite201.0ms (1.1%)

Memory

28.8MiB live, 309.2MiB 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
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval75.0ms (0.4%)

Memory: -11.4MiB live, 184.9MiB allocated
Compiler: Compiled 16 946 to 1 748 computations (89.7% saved)

prune66.0ms (0.4%)

Memory

21.5MiB live, 183.9MiB allocated

Pruning

40 alts after pruning (40 fresh and 0 done)

	Pruned	Kept	Total
New	493	40	533
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	494	40	534

Accuracy

93.9%

Counts

534 → 40

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.2%	(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))
	72.7%	(/.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.0%	(/.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))))))
	73.1%	(+.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))
	70.6%	(.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)
▶	71.3%	(.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)
	73.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.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)
▶	72.8%	(.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)
	72.8%	(.f64 (-.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))))))) R)
	72.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))) (/.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))))))) R)
	56.6%	(.f64 (acos.f64 (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)))) R)
	73.2%	(.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)
	73.1%	(.f64 (acos.f64 (/.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)))))) R)
	56.4%	(.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)
	93.1%	(.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)
	56.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)
	73.1%	(.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)
	73.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.2%	(.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.2%	(.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.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R)
	73.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
	93.1%	(.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 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)))))))) R)
	73.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
	48.6%	(.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)
	44.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)
▶	53.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)) (cos.f64 lambda2))))) R)
	39.8%	(.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)
	43.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)
	37.8%	(.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)
	41.1%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	46.5%	(.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.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 lambda1) lambda2 (cos.f64 lambda1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	56.5%	(.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)
	53.8%	(.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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)
	33.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
	36.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
	40.1%	(.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)
▶	43.9%	(.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 2 372 to 1 692 computations (28.7% saved)

simplify140.0ms (0.8%)

Memory

-16.1MiB live, 224.3MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(-.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)))))))
cost-diff	0	(.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)
cost-diff	128	(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))))
cost-diff	46976	(/.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)))))
cost-diff	0	(PI.f64)
cost-diff	0	(sqrt.f64 (PI.f64))
cost-diff	0	(.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)
cost-diff	1600	(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))))))
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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
cost-diff	128	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 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 (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 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
cost-diff	128	(+.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)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	68	759
0	119	759
1	198	751
2	416	746
3	1222	662
4	4135	659
5	6004	659
0	8169	653

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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R)
(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))))))
(+.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)))))
(*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
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)
(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))))))
(sqrt.f64 (PI.f64))
(PI.f64)
(*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64))
#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)))))
(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)
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 (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)))))))
(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 (-.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 (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 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
phi2
(sin.f64 phi1)
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 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
(cos.f64 phi2)
(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))))
(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 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (cos.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)
(.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(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))))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.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)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
(sin.f64 lambda1)
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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
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 (-.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))))) R)
(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))))))
(-.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)))))
(sqrt.f64 (PI.f64))
(PI.f64)
(*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (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)))))
(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)
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 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(-.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 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(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))))))
(acos.f64 (neg.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 (.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 (fma.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)) (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 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
phi2
(sin.f64 phi1)
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 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
lambda2
lambda1
(cos.f64 phi1)
(cos.f64 phi2)
(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 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (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 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(neg.f64 (cos.f64 phi1))
R

localize540.0ms (3%)

Memory

25.2MiB live, 1 169.8MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.42578125	(/.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)))))
accuracy	0.43492128907376804	(pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))
accuracy	5.205291919086221	(-.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)))))))
accuracy	14.63765422103654	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	0.36856759194897665	(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
accuracy	1.0	(sqrt.f64 (PI.f64))
accuracy	4.901602653089859	(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))))))
accuracy	14.63765422103654	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	0.17578125	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
accuracy	0.20703125	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
accuracy	4.95660718509512	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
accuracy	28.058787463909624	#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
accuracy	0.20703125	(.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.95660718509512	(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.63765422103654	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	28.00941059005067	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy	0.171875	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
accuracy	0.17578125	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
accuracy	0.20703125	(.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)
accuracy	4.95660718509512	(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))))))

Samples

421.0ms	183×	1	valid
46.0ms	72×	0	valid
3.0ms	1×	2	valid

Compiler

Compiled 740 to 59 computations (92% saved)

Precisions

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

ival-cos: 133.0ms (32.5% of total)

ival-sin: 109.0ms (26.6% of total)

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

ival-acos: 30.0ms (7.3% of total)

adjust: 22.0ms (5.4% of total)

ival-add: 13.0ms (3.2% of total)

ival-asin: 12.0ms (2.9% of total)

ival-pow2: 11.0ms (2.7% of total)

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

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

ival-sqrt: 3.0ms (0.7% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series214.0ms (1.2%)

Memory

11.5MiB live, 515.7MiB allocated

Counts

26 → 1 104

Calls

Call 1

Inputs
#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())
#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())
#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (sqrt.f64 (PI.f64)) (patch (sqrt.f64 (PI.f64)) #<representation binary64>) () ())
#s(alt (PI.f64) (patch (PI.f64) #<representation binary64>) () ())
#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())
#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())

Outputs
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg lambda2))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2)))))) (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* lambda1 (+ (* -1 (* lambda1 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2)))))))) (taylor 0 lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* lambda1 (+ (* -1 (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))) (* lambda1 (+ (* -1 (* lambda1 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2)))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))))))) (* -1 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))))))) (taylor 0 lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* 1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi1) (cos phi2))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2))) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (taylor 0 phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi2 (sin phi1))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (* phi2 (+ (* -1 (sin phi1)) (* -1 (* phi2 (- (* -1 (/ (- (pow (sin phi1) 2) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1))))))))))) (taylor 0 phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (* phi2 (+ (* -1 (sin phi1)) (* phi2 (+ (* -1 (- (* -1 (/ (- (pow (sin phi1) 2) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1))))))) (* phi2 (+ (* -1 (/ (* (sin phi1) (- (* -1 (/ (- (pow (sin phi1) 2) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1))))))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi1)) (* 1/6 (sin phi1)))))))))) (taylor 0 phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda2 lambda1))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* phi2 (sin phi1))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* phi2 (- (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda2 lambda1))))) (sin phi1))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* phi2 (- (* phi2 (- (* 1/6 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (cos (- lambda2 lambda1)))))) (sin phi1))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1))))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)) (taylor 0 phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor 0 phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor 0 phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor 0 phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor -inf phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor -inf phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor -inf phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor -inf phi2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (taylor 0 phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* phi1 (sin phi2))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1 (sin phi2)) (* -1 (* phi1 (- (* -1 (/ (- (pow (sin phi2) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1))))))))))) (taylor 0 phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1 (sin phi2)) (* phi1 (+ (* -1 (- (* -1 (/ (- (pow (sin phi2) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1))))))) (* phi1 (+ (* -1 (/ (* (sin phi2) (- (* -1 (/ (- (pow (sin phi2) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1))))))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi2)) (* 1/6 (sin phi2)))))))))) (taylor 0 phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda2 lambda1))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* phi1 (sin phi2))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* phi1 (- (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))) (sin phi2))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* phi1 (- (* phi1 (- (* 1/6 (* phi1 (sin phi2))) (* 1/2 (* (cos phi2) (cos (- lambda2 lambda1)))))) (sin phi2))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1))))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)) (taylor 0 phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor 0 phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor 0 phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor 0 phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor -inf phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor -inf phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor -inf phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor -inf phi1) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (cos phi1)) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))))) (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (* lambda2 (+ (* -1 (* lambda2 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))))))) (* -1 (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))))))) (taylor 0 lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (* lambda2 (+ (* -1 (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))) (* lambda2 (+ (* -1 (* lambda2 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))))))) (* -1 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))))))))))) (taylor 0 lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (neg lambda1)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* (cos phi1) (* (cos phi2) (sin (neg lambda1)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (neg lambda1)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi1) (* (cos phi2) (sin (neg lambda1)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi1) (cos phi2))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi1) (cos phi2))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.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))))) (patch (+.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))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) (patch (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (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)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (-.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))))))) (patch (-.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))))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) (patch (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2))) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
28.0ms	lambda2	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin 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))))) (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (* (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) R) (sqrt (PI)) (PI) (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (cos (- lambda1 lambda2)) (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)))) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))
17.0ms	lambda1	@	-inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin 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))))) (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (* (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) R) (sqrt (PI)) (PI) (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (cos (- lambda1 lambda2)) (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)))) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))
12.0ms	lambda1	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin 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))))) (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (* (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) R) (sqrt (PI)) (PI) (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (cos (- lambda1 lambda2)) (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)))) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))
12.0ms	phi2	@	inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin 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))))) (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (* (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) R) (sqrt (PI)) (PI) (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (cos (- lambda1 lambda2)) (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)))) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))
11.0ms	phi1	@	-inf	((+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin 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))))) (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (* (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) R) (sqrt (PI)) (PI) (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1)))) (* (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (- (PI) (acos (/ (- (pow (* (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))))) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (cos (- lambda1 lambda2)) (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)))) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2))

simplify303.0ms (1.7%)

Memory

25.7MiB live, 567.3MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	789	27834
1	2684	27256
2	6554	27249
0	8309	26201

Stop Event

1×	iter limit
1×	node limit

Counts

1 104 → 1 104

Calls

Call 1

Inputs
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))
(+ (* -1 (* lambda1 (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2)))))) (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))))
(+ (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* lambda1 (+ (* -1 (* lambda1 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))))
(+ (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* lambda1 (+ (* -1 (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))) (* lambda1 (+ (* -1 (* lambda1 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2)))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2)))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))) (* 1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2)))))))))) (* -1 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* -2 (/ (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2))))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (/ (* (cos lambda2) (* (cos phi1) (* (cos phi2) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))))) (pow (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))) 2)))))))))))
(* -1 (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))
(- (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))
(- (* lambda1 (- (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))
(- (* lambda1 (- (* lambda1 (- (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* 1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* -1 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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 (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))))
(* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))
(+ (* 2 (* lambda1 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2)))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* lambda1 (+ (* 2 (* (cos lambda2) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda2))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda2) (sin lambda2))) (* -1/3 (* (cos lambda2) (sin lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))))))) (* (pow (cos lambda2) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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 (- 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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1)))))) (* (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 (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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda2 (* -1 lambda1))) 2)))
(* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* (cos phi1) (cos (- lambda2 lambda1))))
(+ (* -1 (* phi2 (sin phi1))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))))
(+ (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (* phi2 (+ (* -1 (sin phi1)) (* -1 (* phi2 (- (* -1 (/ (- (pow (sin phi1) 2) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1)))))))))))
(+ (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))) (* phi2 (+ (* -1 (sin phi1)) (* phi2 (+ (* -1 (- (* -1 (/ (- (pow (sin phi1) 2) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1))))))) (* phi2 (+ (* -1 (/ (* (sin phi1) (- (* -1 (/ (- (pow (sin phi1) 2) (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi1) (cos (- lambda2 lambda1))))))) (* (cos phi1) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi1)) (* 1/6 (sin phi1))))))))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(- (* -1 (* phi2 (sin phi1))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))))
(- (* phi2 (- (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda2 lambda1))))) (sin phi1))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))))
(- (* phi2 (- (* phi2 (- (* 1/6 (* phi2 (sin phi1))) (* 1/2 (* (cos phi1) (cos (- lambda2 lambda1)))))) (sin phi1))) (* -1 (* (cos phi1) (cos (- lambda2 lambda1)))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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))))
(* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))
(+ (* -1 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi1) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (* (cos phi2) (cos (- lambda2 lambda1))))
(+ (* -1 (* phi1 (sin phi2))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))))
(+ (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1 (sin phi2)) (* -1 (* phi1 (- (* -1 (/ (- (pow (sin phi2) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1)))))))))))
(+ (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1 (sin phi2)) (* phi1 (+ (* -1 (- (* -1 (/ (- (pow (sin phi2) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1))))))) (* phi1 (+ (* -1 (/ (* (sin phi2) (- (* -1 (/ (- (pow (sin phi2) 2) (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda2 lambda1))))) (* -1/2 (* (cos phi2) (cos (- lambda2 lambda1))))))) (* (cos phi2) (cos (- lambda2 lambda1))))) (+ (* -1/2 (sin phi2)) (* 1/6 (sin phi2))))))))))
(* (cos phi2) (cos (- lambda2 lambda1)))
(- (* -1 (* phi1 (sin phi2))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))))
(- (* phi1 (- (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda2 lambda1))))) (sin phi2))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))))
(- (* phi1 (- (* phi1 (- (* 1/6 (* phi1 (sin phi2))) (* 1/2 (* (cos phi2) (cos (- lambda2 lambda1)))))) (sin phi2))) (* -1 (* (cos phi2) (cos (- lambda2 lambda1)))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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))))
(* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))
(+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))))
(+ (* -1 (* lambda2 (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))))) (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))))
(+ (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (* lambda2 (+ (* -1 (* lambda2 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2)))))))) (* -1 (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))))
(+ (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (* lambda2 (+ (* -1 (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))) (* lambda2 (+ (* -1 (* lambda2 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))))))) (* -1 (- (* -1 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (+ (* 1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* 2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda1)) (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))))) (pow (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))) 2)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))))))))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))
(- (* -1 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (neg lambda1)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))
(- (* lambda2 (- (* -1/2 (* lambda2 (* (cos phi1) (* (cos phi2) (cos (neg lambda1)))))) (* (cos phi1) (* (cos phi2) (sin (neg lambda1)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))
(- (* lambda2 (- (* lambda2 (- (* 1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin (neg lambda1)))))) (* 1/2 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))))) (* (cos phi1) (* (cos phi2) (sin (neg lambda1)))))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg lambda1))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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 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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2)))
(+ (* -2 (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(+ (* lambda2 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda1)) (sin (neg lambda1)))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda1)) (sin (neg lambda1)))) (* (cos (neg lambda1)) (sin (neg lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda1)) 2)) (pow (sin (neg lambda1)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda1)) 2))))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (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 (- 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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))
(+ (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))
(* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))
(* -1 (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2))))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (sin phi1) (sin phi2)))))))
(- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2))))))) (* (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 (+ 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))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda1 (* -1 lambda2)))) 2)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (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/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))
(* R (- (PI) (acos (* -1 (/ (- (* (pow (sin phi1) 2) (pow (sin phi2) 2)) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda2 lambda1)) 2)))) (+ (* -1 (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1))))) (* (sin phi1) (sin phi2))))))))

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

rewrite251.0ms (1.4%)

Memory

-9.7MiB live, 427.8MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	68	483
0	119	437
1	425	371
2	3004	371
0	9992	368

Stop Event

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

Counts

26 → 906

Calls

Call 1

Inputs
(+.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)))))
(.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)
(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))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(.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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
(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))))))
(.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)
(sqrt.f64 (PI.f64))
(PI.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 (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 (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 (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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))
(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))))
(pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))

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

eval521.0ms (2.9%)

Memory: 29.7MiB live, 1 090.4MiB allocated
Compiler: Compiled 88 170 to 6 579 computations (92.5% saved)

prune176.0ms (1%)

Memory

-5.5MiB live, 602.6MiB allocated

Pruning

72 alts after pruning (71 fresh and 1 done)

	Pruned	Kept	Total
New	2 267	58	2 325
Fresh	22	13	35
Picked	4	1	5
Done	0	0	0
Total	2 293	72	2 365

Accuracy

94.2%

Counts

2 365 → 72

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	72.2%	(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))
	72.2%	(fma.f64 (asin.f64 (neg.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))
	71.9%	(fma.f64 (PI.f64) R (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R))
	73.0%	(/.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))))))
	72.5%	(/.f64 (.f64 (-.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (acos.f64 (neg.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) (+.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (PI.f64)))
	73.1%	(+.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.8%	(+.f64 (.f64 (PI.f64) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R))
	69.9%	(.f64 (fma.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (sqrt.f64 (PI.f64))) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	72.5%	(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (.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)
	70.0%	(.f64 (fma.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)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	42.0%	(.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)
	69.8%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	72.2%	(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	52.0%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	42.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)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
▶	71.0%	(.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	70.1%	(.f64 (fma.f64 (sqrt.f64 (.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 (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)
	70.8%	(.f64 (fma.f64 (sqrt.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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)
	72.2%	(.f64 (fma.f64 (sqrt.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 (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)
	71.7%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 phi2) (sin.f64 phi1)))))))) R)
	72.5%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 phi2) (sin.f64 phi1)))))))) R)
	90.9%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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)
	90.9%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (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 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 lambda2))))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	48.2%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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)
	70.7%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	70.3%	(.f64 (fma.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	53.7%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	71.8%	(.f64 (/.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 phi2) (sin.f64 phi1))))) (.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 phi2) (sin.f64 phi1)))) #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 phi2) (sin.f64 phi1))))))) R)
	53.7%	(.f64 (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	87.6%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) (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)
	72.9%	(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	40.0%	(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	43.8%	(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	72.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))) (/.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))))))) R)
	42.3%	(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
	73.2%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	53.8%	(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	48.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) R)
	55.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
	73.1%	(.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)
	73.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.2%	(.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.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R)
	50.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))) R)
	53.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
	39.8%	(.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)
	43.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)
	37.8%	(.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.9%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
	43.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)))) R)
	46.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 (sin.f64 phi1) phi2)))) R)
▶	93.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
	56.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	50.4%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
	33.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
	36.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
	53.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) R)
	36.0%	(.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)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R)
	53.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (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 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))))) (cos.f64 phi1)))) R)
	43.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.f64 phi1)))) R)
	36.1%	(.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)
	40.1%	(.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)
▶	24.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
	28.1%	(.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)
	32.3%	(.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)
	34.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)
	18.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 (fma.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
▶	26.3%	(.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)
	73.1%	(.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)

Compiler

Compiled 3 817 to 2 983 computations (21.8% saved)

simplify346.0ms (1.9%)

Memory

-24.8MiB live, 172.7MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))
cost-diff	0	(sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64)))
cost-diff	0	(fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
cost-diff	0	(.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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	(.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	(PI.f64)
cost-diff	0	(*.f64 #s(literal 1/2 binary64) (PI.f64))
cost-diff	320	(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))
cost-diff	0	(.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))
cost-diff	0	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))
cost-diff	0	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))))
cost-diff	0	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
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	(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	78	813
0	126	806
1	200	805
2	352	805
3	625	805
4	911	799
5	1290	799
6	2391	799
7	5019	799
8	5813	799
9	5991	799
10	6048	799
11	6065	799
12	6074	799
13	6525	799
14	6610	799
15	6648	799
16	6678	799
17	6705	799
18	6723	799
19	6729	799
20	6729	799
21	7057	799
22	7193	799
23	7193	799
24	7193	799
25	7193	799
26	7199	799
0	7199	799

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda1)
(sin.f64 lambda2)
(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)) (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 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))
(.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
lambda1
(cos.f64 lambda2)
lambda2
#s(literal -1/2 binary64)
(sin.f64 lambda2)
(cos.f64 phi1)
phi1
R
(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))
(*.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 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64)))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))
(cbrt.f64 (PI.f64))
(PI.f64)
#s(literal 5 binary64)
(pow.f64 (PI.f64) #s(literal 1/6 binary64))
#s(literal 1/6 binary64)
(neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.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)
R

Outputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)
(.f64 R (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 phi1) (.f64 (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))))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 phi1) (.f64 (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)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 phi1) (.f64 (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))))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (cos.f64 phi1) (.f64 (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 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))
(.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(cos.f64 lambda1)
lambda1
(cos.f64 lambda2)
lambda2
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda1)
(sin.f64 lambda2)
(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)) (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 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (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 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))))
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))
(.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))
(.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) lambda1)
lambda1
(cos.f64 lambda2)
lambda2
#s(literal -1/2 binary64)
(sin.f64 lambda2)
(cos.f64 phi1)
phi1
R
(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))
(.f64 (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))))) (neg.f64 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 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (PI.f64) #s(literal 1/6 binary64)) (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64)))) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 1/6 binary64)) (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64)))) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64)))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))
(cbrt.f64 (PI.f64))
(PI.f64)
#s(literal 5 binary64)
(pow.f64 (PI.f64) #s(literal 1/6 binary64))
#s(literal 1/6 binary64)
(neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(neg.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)
R

localize516.0ms (2.9%)

Memory

19.1MiB live, 1 333.0MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	1.0	(cbrt.f64 (PI.f64))
accuracy	2.0	(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))
accuracy	4.766707618170575	(fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
accuracy	14.63765422103654	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	0.22265625	(.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.36856759194897665	(asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
accuracy	4.6831033389945524	(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))
accuracy	14.63765422103654	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	0.20703125	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
accuracy	4.95660718509512	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))))
accuracy	28.00941059005067	#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))
accuracy	30.979892861633296	#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
accuracy	4.95660718509512	(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.63765422103654	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	28.00941059005067	#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	29.15306291311905	#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy	0.171875	(*.f64 (sin.f64 phi2) (sin.f64 phi1))
accuracy	0.18094503162065376	(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
accuracy	0.20703125	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)
accuracy	4.95660718509512	(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))

Samples

373.0ms	183×	1	valid
51.0ms	71×	0	valid
4.0ms	1×	3	valid
3.0ms	1×	2	valid

Compiler

Compiled 637 to 69 computations (89.2% saved)

Precisions

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

ival-cos: 99.0ms (27.1% of total)

ival-mult: 72.0ms (19.7% of total)

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

ival-add: 30.0ms (8.2% of total)

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

adjust: 27.0ms (7.4% of total)

ival-pow: 16.0ms (4.4% of total)

ival-asin: 12.0ms (3.3% of total)

ival-neg: 8.0ms (2.2% of total)

const: 7.0ms (1.9% of total)

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

ival-sqrt: 4.0ms (1.1% of total)

ival-cbrt: 3.0ms (0.8% of total)

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

exact: 1.0ms (0.3% of total)

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

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

series154.0ms (0.9%)

Memory

11.6MiB live, 401.6MiB allocated

Counts

26 → 960

Calls

Call 1

Inputs
#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())
#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())
#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())
#s(alt (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)) (patch (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)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (PI.f64)) (patch (.f64 #s(literal 1/2 binary64) (PI.f64)) #<representation binary64>) () ())
#s(alt (PI.f64) (patch (PI.f64) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())
#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (patch (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) #<representation binary64>) () ())
#s(alt (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64)) (patch (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())
#s(alt (cbrt.f64 (PI.f64)) (patch (cbrt.f64 (PI.f64)) #<representation binary64>) () ())

Outputs
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg lambda2))) (taylor 0 lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor 0 phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor 0 phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi1) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi2) (sin.f64 phi1)) (patch (.f64 (sin.f64 phi2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (cos phi1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (cos phi1)) (taylor 0 lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (patch (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (patch (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) (patch (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) (patch #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) (patch (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda2) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) (patch (asin.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor 0 R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor 0 R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor 0 R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor 0 R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor inf R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor inf R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor inf R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor inf R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) (patch (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) (patch (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI))))) (taylor -inf R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI))))) (taylor -inf R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI))))) (taylor -inf R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI))))) (taylor -inf R) (#s(alt (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)) (patch (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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf R) (#s(alt (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
9.0ms	lambda1	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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)) (* (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)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* 1/2 (PI)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (sqrt (pow (cbrt (PI)) 5)) (pow (cbrt (PI)) 5) (* (sin phi2) (sin phi1)) (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cbrt (PI)))
8.0ms	lambda2	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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)) (* (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)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* 1/2 (PI)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (sqrt (pow (cbrt (PI)) 5)) (pow (cbrt (PI)) 5) (* (sin phi2) (sin phi1)) (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cbrt (PI)))
7.0ms	phi1	@	inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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)) (* (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)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* 1/2 (PI)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (sqrt (pow (cbrt (PI)) 5)) (pow (cbrt (PI)) 5) (* (sin phi2) (sin phi1)) (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cbrt (PI)))
7.0ms	phi2	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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)) (* (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)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* 1/2 (PI)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (sqrt (pow (cbrt (PI)) 5)) (pow (cbrt (PI)) 5) (* (sin phi2) (sin phi1)) (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cbrt (PI)))
6.0ms	phi1	@	-inf	((* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (+ (* (* (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))) (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)) (* (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)) (+ (* (* 1/2 (PI)) R) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R)) (* 1/2 (PI)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (+ (* (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (sqrt (pow (cbrt (PI)) 5)) (pow (cbrt (PI)) 5) (* (sin phi2) (sin phi1)) (cos (- lambda1 lambda2)) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cbrt (PI)))

simplify253.0ms (1.4%)

Memory

25.5MiB live, 443.2MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	372	18273
1	1174	18019
2	3418	17726
3	6190	17724
0	8235	16607

Stop Event

1×	iter limit
1×	node limit

Counts

960 → 960

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

rewrite220.0ms (1.2%)

Memory

17.1MiB live, 414.5MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	78	558
0	126	500
1	452	492
2	2897	480
0	8979	479

Stop Event

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

Counts

26 → 570

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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)) (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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) R)
(acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1))))
#s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))
(.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.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))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.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))))) R)
(.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64)))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
(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))))
(cbrt.f64 (PI.f64))

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

eval273.0ms (1.5%)

Memory: -20.9MiB live, 773.3MiB allocated
Compiler: Compiled 52 005 to 4 046 computations (92.2% saved)

prune182.0ms (1%)

Memory

-17.3MiB live, 593.9MiB allocated

Pruning

91 alts after pruning (88 fresh and 3 done)

	Pruned	Kept	Total
New	1 712	45	1 757
Fresh	23	43	66
Picked	3	2	5
Done	0	1	1
Total	1 738	91	1 829

Accuracy

94.4%

Counts

1 829 → 91

Alt Table

Click to see full alt table

Status	Accuracy	Program
	69.8%	(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R))
	73.1%	(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)))
	72.2%	(fma.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (pow.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))
	71.3%	(fma.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))
	72.0%	(fma.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))
	72.2%	(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (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))))))) R))
	92.2%	(fma.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	92.2%	(fma.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 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	72.2%	(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	40.2%	(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) R))
	42.1%	(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
	49.0%	(fma.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))
▶	52.9%	(fma.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))
	70.7%	(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R))
	71.9%	(fma.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R (*.f64 (PI.f64) R))
	72.2%	(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)))
	71.9%	(fma.f64 (PI.f64) R (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R))
	72.8%	(+.f64 (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R) (.f64 (PI.f64) R))
	70.0%	(.f64 (fma.f64 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 5/4 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	69.9%	(.f64 (fma.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (sqrt.f64 (PI.f64))) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	70.8%	(.f64 (fma.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/12 binary64)) #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	72.5%	(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (.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)
▶	71.0%	(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	42.0%	(.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)
	24.6%	(.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)
	69.8%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	72.2%	(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 5/6 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	52.0%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	42.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)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	24.7%	(.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)
	69.7%	(.f64 (fma.f64 (sqrt.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 4 binary64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	90.6%	(.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	90.6%	(.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (/.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)))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	48.0%	(.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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)
	70.1%	(.f64 (fma.f64 (sqrt.f64 (.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 (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)
	70.8%	(.f64 (fma.f64 (sqrt.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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)
	72.2%	(.f64 (fma.f64 (sqrt.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 (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)
	72.5%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 phi2) (sin.f64 phi1)))))))) R)
	48.2%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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)
	70.7%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	70.3%	(.f64 (fma.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	53.7%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	26.3%	(.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)
	53.7%	(.f64 (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	72.9%	(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	40.0%	(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	43.8%	(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	42.3%	(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
	73.2%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	53.8%	(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	48.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) R)
	55.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
	73.1%	(.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)
	73.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.2%	(.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.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R)
	50.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))) R)
	53.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
	39.8%	(.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)
▶	43.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)
	28.9%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
	43.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)))) R)
	46.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 (sin.f64 phi1) phi2)))) R)
✓	93.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)
	56.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
	50.4%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
	53.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
	33.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
	36.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
	36.0%	(.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)
	36.1%	(.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)
	40.1%	(.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)
	32.3%	(.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)
	34.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)
	26.3%	(.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 lambda2) (cos.f64 lambda1)))))) R)
	24.6%	(.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 lambda2) (sin.f64 lambda1)))))) R)
	31.6%	(.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 lambda2) (cos.f64 lambda1)))))) R)
	12.3%	(.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.6%	(.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 lambda2) (sin.f64 lambda1)))))) 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)) (/.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)))))))) R)
	26.3%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))))) R)
	18.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 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
✓	26.3%	(.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)
	11.3%	(.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 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
	11.9%	(.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)
	13.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)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
	17.1%	(.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)
▶	18.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)
	72.9%	(.f64 #s(approx (+ ( (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)

Compiler

Compiled 4 255 to 3 629 computations (14.7% saved)

simplify107.0ms (0.6%)

Memory

7.7MiB live, 204.9MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(PI.f64)
cost-diff	0	(sqrt.f64 (PI.f64))
cost-diff	0	(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64))
cost-diff	192	(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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	(.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)
cost-diff	0	(PI.f64)
cost-diff	0	(*.f64 #s(literal 1/2 binary64) (PI.f64))
cost-diff	320	(fma.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))
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 phi1)))))
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 phi1))))) 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 phi1))))
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	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))))
cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R)
cost-diff	128	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))
cost-diff	704	(/.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)))))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	82	972
0	140	971
1	227	962
2	427	960
3	1079	960
4	1780	957
5	2868	957
6	4772	957
0	8091	951

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)) (/.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)))))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(sin.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(cos.f64 phi1)
(cos.f64 phi2)
(/.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)))))
#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 (.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 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(cos.f64 lambda2)
(cos.f64 lambda1)
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
#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)))
(pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))
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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) 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 phi1)))))
(+.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))))
(*.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 phi1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi1)
R
(fma.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))
(*.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 lambda2)) (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 lambda2)) (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 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64))
(sqrt.f64 (PI.f64))
(PI.f64)
#s(literal 5/3 binary64)
(pow.f64 (PI.f64) #s(literal 1/6 binary64))
#s(literal 1/6 binary64)
(neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.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)
R

Outputs
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R)
(.f64 R (acos.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))) (fma.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.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)) (/.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))))))))
(acos.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))) (fma.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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 (/.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 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.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)) (/.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))))))
(.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))) (fma.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
(cos.f64 phi2)
(/.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)))))
(/.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 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 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 (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 (fma.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.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 (.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)))
(fma.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (cos.f64 lambda2) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 lambda1)
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))
#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)))
(+.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 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))
(pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))
#s(literal 3 binary64)
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))
(pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))
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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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 phi1)))))
(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 phi1)))))
(+.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))))
(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 phi1))))
(*.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 phi1)))
#s(approx (* (* (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)
R
(fma.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))
(.f64 (fma.f64 #s(literal -1/2 binary64) (PI.f64) (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (neg.f64 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 lambda2)) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (cos.f64 phi1))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(cos.f64 phi1)
phi1
(cos.f64 phi2)
phi2
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(sin.f64 phi2)
(sin.f64 phi1)
(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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) (fma.f64 (neg.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64))) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (acos.f64 (neg.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 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (neg.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64))) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (acos.f64 (neg.f64 (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))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64))
(sqrt.f64 (PI.f64))
(PI.f64)
#s(literal 5/3 binary64)
(pow.f64 (PI.f64) #s(literal 1/6 binary64))
#s(literal 1/6 binary64)
(neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(neg.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)
R

localize512.0ms (2.9%)

Memory

-1.9MiB live, 1 356.0MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	1.0	(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64))
accuracy	1.0	(sqrt.f64 (PI.f64))
accuracy	4.766707618170575	(fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))
accuracy	14.63765422103654	(cos.f64 (-.f64 lambda2 lambda1))
accuracy	0.22265625	(.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)
accuracy	0.36856759194897665	(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))))
accuracy	4.6831033389945524	(fma.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))
accuracy	28.058787463909624	#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))
accuracy	0.20703125	(.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)
accuracy	4.95660718509512	(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)))))
accuracy	14.63765422103654	(cos.f64 (-.f64 lambda1 lambda2))
accuracy	27.728401537209653	#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
accuracy	4.95660718509512	(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.292874087150448	#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
accuracy	28.00941059005067	#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	29.15306291311905	#s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))
accuracy	0.33203125	(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
accuracy	0.33439262698974626	(pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))
accuracy	0.5183564453688406	(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))
accuracy	4.95660718509512	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))))

Samples

370.0ms	183×	1	valid
55.0ms	72×	0	valid
3.0ms	1×	2	valid

Compiler

Compiled 883 to 69 computations (92.2% saved)

Precisions

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

ival-cos: 89.0ms (24.2% of total)

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

ival-sin: 54.0ms (14.7% of total)

ival-pow: 41.0ms (11.1% of total)

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

adjust: 25.0ms (6.8% of total)

const: 17.0ms (4.6% of total)

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

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

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

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

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

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

ival-sqrt: 4.0ms (1.1% of total)

ival-copysign: 3.0ms (0.8% of total)

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

ival-fabs: 2.0ms (0.5% of total)

exact: 1.0ms (0.3% of total)

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

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

series239.0ms (1.3%)

Memory

30.4MiB live, 502.6MiB allocated

Counts

29 → 1 044

Calls

Call 1

Inputs
#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())
#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())
#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())
#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())
#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())
#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())
#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())
#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())
#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (PI.f64)) (patch (.f64 #s(literal 1/2 binary64) (PI.f64)) #<representation binary64>) () ())
#s(alt (PI.f64) (patch (PI.f64) #<representation binary64>) () ())
#s(alt (.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) (patch (.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) #<representation binary64>) () ())
#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())
#s(alt (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (patch (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (PI.f64)) (patch (sqrt.f64 (PI.f64)) #<representation binary64>) () ())
#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())
#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())
#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())

Outputs
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -3/2 (cos lambda2)) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -3/2 (cos lambda2)) (* lambda1 (- (/ (pow (sin lambda2) 3) (pow (cos lambda2) 2)) (+ (* -1 (/ (* (sin lambda2) (- (* -3/2 (cos lambda2)) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (cos lambda2))) (+ (* 1/6 (sin lambda2)) (+ (* 1/2 (sin lambda2)) (/ (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (pow (cos lambda2) 2)))))))) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (* lambda1 (- (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (- (* lambda1 (- (+ (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* lambda1 (- (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 3))) (pow (cos lambda2) 2)) (+ (* -1 (/ (* (sin lambda2) (- (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (cos lambda2))) (+ (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))) (pow (cos lambda2) 2)) (/ (* (cos phi1) (* (cos phi2) (+ (* 1/6 (* (cos lambda2) (sin lambda2))) (* 1/2 (* (cos lambda2) (sin lambda2)))))) (cos lambda2))))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (sin (neg lambda2))))) (* (cos phi1) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi1) (sin (neg lambda2)))) (* -1/2 (* lambda1 (* (cos phi1) (cos (neg lambda2))))))) (* (cos phi1) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (pow (cos lambda2) 3) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -3/2 (* (pow lambda1 2) (pow (cos lambda2) 3))) (pow (cos lambda2) 3)) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda1 2) (+ (* -3/2 (pow (cos lambda2) 3)) (* 7/8 (* (pow lambda1 2) (pow (cos lambda2) 3))))) (pow (cos lambda2) 3)) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda1 2) (+ (* -3/2 (pow (cos lambda2) 3)) (* (pow lambda1 2) (+ (* -61/240 (* (pow lambda1 2) (pow (cos lambda2) 3))) (* 7/8 (pow (cos lambda2) 3)))))) (pow (cos lambda2) 3)) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 3) (pow (sin lambda2) 3)) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 3) (+ (* -1/2 (* (pow lambda1 2) (pow (sin lambda2) 3))) (pow (sin lambda2) 3))) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 3) (+ (* (pow lambda1 2) (+ (* -1/2 (pow (sin lambda2) 3)) (* 13/120 (* (pow lambda1 2) (pow (sin lambda2) 3))))) (pow (sin lambda2) 3))) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 3) (+ (* (pow lambda1 2) (+ (* -1/2 (pow (sin lambda2) 3)) (* (pow lambda1 2) (+ (* -41/3024 (* (pow lambda1 2) (pow (sin lambda2) 3))) (* 13/120 (pow (sin lambda2) 3)))))) (pow (sin lambda2) 3))) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos lambda2) 2) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow lambda1 2) (pow (cos lambda2) 2))) (pow (cos lambda2) 2)) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (cos lambda2) 2))))) (pow (cos lambda2) 2)) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (cos lambda2) 2))) (* 1/3 (pow (cos lambda2) 2)))))) (pow (cos lambda2) 2)) (taylor 0 lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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))))) (taylor 0 lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor -inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor -inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor -inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor -inf lambda1) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf lambda1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf lambda1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf lambda1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor -inf lambda1) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (/ (* phi2 (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (* -1/6 (* phi2 (sin phi1))))))) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor 0 phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* phi2 (sin phi1)) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor 0 phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf phi2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf phi2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf phi2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi2) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (/ (* phi1 (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (* -1/6 (* phi1 (sin phi2))))))) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor 0 phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor 0 phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda1 lambda2)) (* -1/2 (* (pow phi1 2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/24 (* (pow phi1 2) (cos (- lambda1 lambda2))))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (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)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin phi2)) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin phi2))) (* 1/120 (sin phi2)))))))) (taylor 0 phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (cos (- lambda1 lambda2))) (taylor 0 phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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)))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (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))))))))) (taylor 0 phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf phi1) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf phi1) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf phi1) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor -inf phi1) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (sin phi2)) (taylor -inf phi1) (#s(alt (.f64 (sin.f64 phi1) (sin.f64 phi2)) (patch (.f64 (sin.f64 phi1) (sin.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf phi1) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf phi1) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor -inf phi1) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor -inf phi1) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf phi1) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -3/2 (cos lambda1)) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -3/2 (cos lambda1)) (* lambda2 (- (/ (pow (sin lambda1) 3) (pow (cos lambda1) 2)) (+ (* -1 (/ (* (sin lambda1) (- (* -3/2 (cos lambda1)) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (cos lambda1))) (+ (/ (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (cos lambda1) 2)) (/ (* (sin lambda1) (+ (* 1/6 (cos lambda1)) (* 1/2 (cos lambda1)))) (cos lambda1))))))) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (- (* lambda2 (- (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (- (* lambda2 (- (+ (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 3))) (pow (cos lambda1) 2)) (+ (* -1 (/ (* (sin lambda1) (- (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (cos lambda1))) (+ (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (pow (cos lambda1) 2)) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (+ (* 1/6 (cos lambda1)) (* 1/2 (cos lambda1)))))) (cos lambda1))))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor 0 lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (cos phi1)) (taylor 0 lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (sin lambda1))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos phi1)))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* lambda2 (* (cos phi1) (sin lambda1)))))) (* (cos phi1) (sin lambda1)))) (* (cos lambda1) (cos phi1))) (taylor 0 lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (taylor 0 lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor 0 lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (pow (cos lambda1) 3) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -3/2 (* (pow lambda2 2) (pow (cos lambda1) 3))) (pow (cos lambda1) 3)) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda2 2) (+ (* -3/2 (pow (cos lambda1) 3)) (* 7/8 (* (pow lambda2 2) (pow (cos lambda1) 3))))) (pow (cos lambda1) 3)) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda2 2) (+ (* -3/2 (pow (cos lambda1) 3)) (* (pow lambda2 2) (+ (* -61/240 (* (pow lambda2 2) (pow (cos lambda1) 3))) (* 7/8 (pow (cos lambda1) 3)))))) (pow (cos lambda1) 3)) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 3) (pow (sin lambda1) 3)) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 3) (+ (* -1/2 (* (pow lambda2 2) (pow (sin lambda1) 3))) (pow (sin lambda1) 3))) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 3) (+ (* (pow lambda2 2) (+ (* -1/2 (pow (sin lambda1) 3)) (* 13/120 (* (pow lambda2 2) (pow (sin lambda1) 3))))) (pow (sin lambda1) 3))) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda2 3) (+ (* (pow lambda2 2) (+ (* -1/2 (pow (sin lambda1) 3)) (* (pow lambda2 2) (+ (* -41/3024 (* (pow lambda2 2) (pow (sin lambda1) 3))) (* 13/120 (pow (sin lambda1) 3)))))) (pow (sin lambda1) 3))) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (pow (cos lambda1) 2) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2)) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* 1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2)) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 1/3 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2)) (taylor 0 lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi1) (cos phi2))) (taylor 0 lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2)))) (taylor 0 lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (+ (* 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)))) (taylor 0 lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor 0 lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (taylor inf lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor inf lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (taylor inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor -inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor -inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor -inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))) (taylor -inf lambda2) (#s(alt (/.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))))) (patch (/.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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (taylor -inf lambda2) (#s(alt (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) (patch (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf lambda2) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))) (taylor -inf lambda2) (#s(alt (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) (patch (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt #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)))) (patch #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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (cos (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) (patch #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (taylor -inf lambda2) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI)))) (taylor -inf lambda2) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))) (taylor -inf lambda2) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (patch (pow.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)) (taylor -inf lambda2) (#s(alt (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (patch (pow.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (patch #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) (patch #s(approx ( (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (patch #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))) (taylor -inf lambda2) (#s(alt (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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) (patch (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor 0 R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor 0 R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor 0 R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor 0 R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor 0 R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor 0 R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor 0 R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor inf R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor inf R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor inf R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI)))) (taylor inf R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor inf R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (taylor -inf R) (#s(alt (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) (patch (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI))))) (taylor -inf R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI))))) (taylor -inf R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI))))) (taylor -inf R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI))))) (taylor -inf R) (#s(alt (fma.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)) (patch (fma.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)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (taylor -inf R) (#s(alt (.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) (patch (.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) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())
#s(alt (* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))) (taylor -inf R) (#s(alt (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) (patch (.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R) #<representation binary64>) () ())) ())

Calls

15 calls:

Time	Variable		Point	Expression
26.0ms	lambda2	@	inf	((/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) (* (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)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (pow (sqrt (PI)) 5/3) (sqrt (PI)) (pow (* (cos lambda2) (cos lambda1)) 3) (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 2) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cos (- lambda2 lambda1)) (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))))
25.0ms	R	@	inf	((/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) (* (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)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (pow (sqrt (PI)) 5/3) (sqrt (PI)) (pow (* (cos lambda2) (cos lambda1)) 3) (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 2) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cos (- lambda2 lambda1)) (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))))
13.0ms	lambda1	@	inf	((/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) (* (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)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (pow (sqrt (PI)) 5/3) (sqrt (PI)) (pow (* (cos lambda2) (cos lambda1)) 3) (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 2) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cos (- lambda2 lambda1)) (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))))
13.0ms	lambda1	@	-inf	((/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) (* (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)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (pow (sqrt (PI)) 5/3) (sqrt (PI)) (pow (* (cos lambda2) (cos lambda1)) 3) (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 2) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cos (- lambda2 lambda1)) (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))))
12.0ms	lambda2	@	-inf	((/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))) (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) R) (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3))))))) (* (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)) (PI) (* (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))) R) (* (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) R) (pow (sqrt (PI)) 5/3) (sqrt (PI)) (pow (* (cos lambda2) (cos lambda1)) 3) (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 2) (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)) (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))) (cos (- lambda2 lambda1)) (+ (* (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))))

simplify286.0ms (1.6%)

Memory

-4.1MiB live, 510.2MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	667	25449
1	2128	24838
2	7161	24805
0	8432	23515

Stop Event

1×	iter limit
1×	node limit

Counts

1 044 → 1 044

Calls

Call 1

Inputs
(cos lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -3/2 (cos lambda2)) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -3/2 (cos lambda2)) (* lambda1 (- (/ (pow (sin lambda2) 3) (pow (cos lambda2) 2)) (+ (* -1 (/ (* (sin lambda2) (- (* -3/2 (cos lambda2)) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (cos lambda2))) (+ (* 1/6 (sin lambda2)) (+ (* 1/2 (sin lambda2)) (/ (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (pow (cos lambda2) 2)))))))) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))
(+ (* (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 (- (* lambda1 (- (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda1 (- (* lambda1 (- (+ (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* lambda1 (- (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 3))) (pow (cos lambda2) 2)) (+ (* -1 (/ (* (sin lambda2) (- (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (cos lambda2))) (+ (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))) (pow (cos lambda2) 2)) (/ (* (cos phi1) (* (cos phi2) (+ (* 1/6 (* (cos lambda2) (sin lambda2))) (* 1/2 (* (cos lambda2) (sin lambda2)))))) (cos lambda2))))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(pow (cos lambda2) 3)
(+ (* -3/2 (* (pow lambda1 2) (pow (cos lambda2) 3))) (pow (cos lambda2) 3))
(+ (* (pow lambda1 2) (+ (* -3/2 (pow (cos lambda2) 3)) (* 7/8 (* (pow lambda1 2) (pow (cos lambda2) 3))))) (pow (cos lambda2) 3))
(+ (* (pow lambda1 2) (+ (* -3/2 (pow (cos lambda2) 3)) (* (pow lambda1 2) (+ (* -61/240 (* (pow lambda1 2) (pow (cos lambda2) 3))) (* 7/8 (pow (cos lambda2) 3)))))) (pow (cos lambda2) 3))
(* (pow lambda1 3) (pow (sin lambda2) 3))
(* (pow lambda1 3) (+ (* -1/2 (* (pow lambda1 2) (pow (sin lambda2) 3))) (pow (sin lambda2) 3)))
(* (pow lambda1 3) (+ (* (pow lambda1 2) (+ (* -1/2 (pow (sin lambda2) 3)) (* 13/120 (* (pow lambda1 2) (pow (sin lambda2) 3))))) (pow (sin lambda2) 3)))
(* (pow lambda1 3) (+ (* (pow lambda1 2) (+ (* -1/2 (pow (sin lambda2) 3)) (* (pow lambda1 2) (+ (* -41/3024 (* (pow lambda1 2) (pow (sin lambda2) 3))) (* 13/120 (pow (sin lambda2) 3)))))) (pow (sin lambda2) 3)))
(pow (cos lambda2) 2)
(+ (* -1 (* (pow lambda1 2) (pow (cos lambda2) 2))) (pow (cos lambda2) 2))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (cos lambda2) 2))))) (pow (cos lambda2) 2))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (cos lambda2) 2))) (* 1/3 (pow (cos lambda2) 2)))))) (pow (cos lambda2) 2))
(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 (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))))
(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)))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(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 (- 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))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* 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 (* 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))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(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 (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))))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(+ (* phi2 (sin phi1)) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (/ (* phi2 (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (* -1/6 (* phi2 (sin phi1))))))) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* (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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (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))))
(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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (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))))
(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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(+ (* phi1 (sin phi2)) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (/ (* phi1 (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (* -1/6 (* phi1 (sin phi2))))))) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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))))
(* -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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (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)))))))))
(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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (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))))
(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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (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))))
(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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -3/2 (cos lambda1)) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (+ (* -3/2 (cos lambda1)) (* lambda2 (- (/ (pow (sin lambda1) 3) (pow (cos lambda1) 2)) (+ (* -1 (/ (* (sin lambda1) (- (* -3/2 (cos lambda1)) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (cos lambda1))) (+ (/ (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (cos lambda1) 2)) (/ (* (sin lambda1) (+ (* 1/6 (cos lambda1)) (* 1/2 (cos lambda1)))) (cos lambda1))))))) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin 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 (- (* lambda2 (- (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+ (* lambda2 (- (* lambda2 (- (+ (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 3))) (pow (cos lambda1) 2)) (+ (* -1 (/ (* (sin lambda1) (- (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (cos lambda1))) (+ (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (pow (cos lambda1) 2)) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (+ (* 1/6 (cos lambda1)) (* 1/2 (cos lambda1)))))) (cos lambda1))))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(pow (cos lambda1) 3)
(+ (* -3/2 (* (pow lambda2 2) (pow (cos lambda1) 3))) (pow (cos lambda1) 3))
(+ (* (pow lambda2 2) (+ (* -3/2 (pow (cos lambda1) 3)) (* 7/8 (* (pow lambda2 2) (pow (cos lambda1) 3))))) (pow (cos lambda1) 3))
(+ (* (pow lambda2 2) (+ (* -3/2 (pow (cos lambda1) 3)) (* (pow lambda2 2) (+ (* -61/240 (* (pow lambda2 2) (pow (cos lambda1) 3))) (* 7/8 (pow (cos lambda1) 3)))))) (pow (cos lambda1) 3))
(* (pow lambda2 3) (pow (sin lambda1) 3))
(* (pow lambda2 3) (+ (* -1/2 (* (pow lambda2 2) (pow (sin lambda1) 3))) (pow (sin lambda1) 3)))
(* (pow lambda2 3) (+ (* (pow lambda2 2) (+ (* -1/2 (pow (sin lambda1) 3)) (* 13/120 (* (pow lambda2 2) (pow (sin lambda1) 3))))) (pow (sin lambda1) 3)))
(* (pow lambda2 3) (+ (* (pow lambda2 2) (+ (* -1/2 (pow (sin lambda1) 3)) (* (pow lambda2 2) (+ (* -41/3024 (* (pow lambda2 2) (pow (sin lambda1) 3))) (* 13/120 (pow (sin lambda1) 3)))))) (pow (sin lambda1) 3)))
(pow (cos lambda1) 2)
(+ (* -1 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* 1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 1/3 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2))
(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 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))))
(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)))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(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 (- 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))))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(* 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 (* 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))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(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 (+ 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))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos 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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos 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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(* R (acos (+ (* (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))

Outputs
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (* -3/2 (cos lambda2)) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (- (+ (* -3/2 (cos lambda2)) (* lambda1 (- (/ (pow (sin lambda2) 3) (pow (cos lambda2) 2)) (+ (* -1 (/ (* (sin lambda2) (- (* -3/2 (cos lambda2)) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (cos lambda2))) (+ (* 1/6 (sin lambda2)) (+ (* 1/2 (sin lambda2)) (/ (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))) (pow (cos lambda2) 2)))))))) (+ (* -1 (cos lambda2)) (+ (* -1 (/ (pow (sin lambda2) 2) (cos lambda2))) (/ (pow (sin lambda2) 2) (cos lambda2)))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 lambda2)) (fma.f64 (sin.f64 lambda2) #s(literal 2/3 binary64) (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (sin.f64 lambda2)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 (cos.f64 phi2) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (- (* lambda1 (- (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 #s(literal -3/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (cos.f64 phi1)) (cos.f64 lambda2)))) lambda1 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* lambda1 (- (* lambda1 (- (+ (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* lambda1 (- (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 3))) (pow (cos lambda2) 2)) (+ (* -1 (/ (* (sin lambda2) (- (* -3/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (cos lambda2))) (+ (/ (* (cos phi1) (* (cos phi2) (* (sin lambda2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2))))) (pow (cos lambda2) 2)) (/ (* (cos phi1) (* (cos phi2) (+ (* 1/6 (* (cos lambda2) (sin lambda2))) (* 1/2 (* (cos lambda2) (sin lambda2)))))) (cos lambda2))))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda2) 2))) (cos lambda2))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda2) 2)) (pow (sin lambda2) 2)))) (cos lambda2))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (cos.f64 phi2) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (/.f64 (cos.f64 phi1) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 (.f64 (.f64 #s(literal -3/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (cos.f64 phi1)) (cos.f64 lambda2)))) (/.f64 (sin.f64 lambda2) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (sin.f64 lambda2)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (sin.f64 lambda2) (.f64 (cos.f64 lambda2) #s(literal 2/3 binary64))) (cos.f64 phi2)) (cos.f64 lambda2)))))) lambda1 (fma.f64 (.f64 (.f64 #s(literal -3/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (cos.f64 lambda2)))) (/.f64 (.f64 (.f64 (cos.f64 phi2) (-.f64 (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (cos.f64 phi1)) (cos.f64 lambda2))))) lambda1 (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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 phi2) (cos.f64 lambda2)) (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 (cos.f64 phi2) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 phi2) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 (cos.f64 phi1) (sin.f64 lambda2)) (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 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1)) lambda1 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos phi1) (cos (neg lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 lambda2))
(+ (* -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 phi1) (cos.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) (.f64 lambda1 (cos.f64 phi1))) (cos.f64 lambda2) (.f64 (cos.f64 phi1) (sin.f64 lambda2))) lambda1 (.f64 (cos.f64 phi1) (cos.f64 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))))
(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 (cos.f64 phi1) (sin.f64 lambda2))) lambda1 (.f64 (cos.f64 phi1) (cos.f64 lambda2)))
(+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 (cos.f64 phi2) (sin.f64 lambda2)) (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 phi2) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (cos.f64 phi1))) lambda1 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 (cos.f64 phi1) (sin.f64 lambda2)) (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 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1)) lambda1 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(pow (cos lambda2) 3)
(pow.f64 (cos.f64 lambda2) #s(literal 3 binary64))
(+ (* -3/2 (* (pow lambda1 2) (pow (cos lambda2) 3))) (pow (cos lambda2) 3))
(.f64 (fma.f64 #s(literal -3/2 binary64) (.f64 lambda1 lambda1) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))
(+ (* (pow lambda1 2) (+ (* -3/2 (pow (cos lambda2) 3)) (* 7/8 (* (pow lambda1 2) (pow (cos lambda2) 3))))) (pow (cos lambda2) 3))
(fma.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 7/8 binary64) (.f64 lambda1 lambda1) #s(literal -3/2 binary64))) (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)))
(+ (* (pow lambda1 2) (+ (* -3/2 (pow (cos lambda2) 3)) (* (pow lambda1 2) (+ (* -61/240 (* (pow lambda1 2) (pow (cos lambda2) 3))) (* 7/8 (pow (cos lambda2) 3)))))) (pow (cos lambda2) 3))
(fma.f64 (fma.f64 #s(literal -3/2 binary64) (.f64 lambda1 lambda1) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 lambda1 lambda1) #s(literal 7/8 binary64)))))
(* (pow lambda1 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow lambda1 3) (+ (* -1/2 (* (pow lambda1 2) (pow (sin lambda2) 3))) (pow (sin lambda2) 3)))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (pow.f64 lambda1 #s(literal 3 binary64)))
(* (pow lambda1 3) (+ (* (pow lambda1 2) (+ (* -1/2 (pow (sin lambda2) 3)) (* 13/120 (* (pow lambda1 2) (pow (sin lambda2) 3))))) (pow (sin lambda2) 3)))
(.f64 (fma.f64 (.f64 (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal 13/120 binary64) (.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (.f64 lambda1 lambda1) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (pow.f64 lambda1 #s(literal 3 binary64)))
(* (pow lambda1 3) (+ (* (pow lambda1 2) (+ (* -1/2 (pow (sin lambda2) 3)) (* (pow lambda1 2) (+ (* -41/3024 (* (pow lambda1 2) (pow (sin lambda2) 3))) (* 13/120 (pow (sin lambda2) 3)))))) (pow (sin lambda2) 3)))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (fma.f64 #s(literal -41/3024 binary64) (*.f64 lambda1 lambda1) #s(literal 13/120 binary64))))) (pow.f64 lambda1 #s(literal 3 binary64)))
(pow (cos lambda2) 2)
(pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))
(+ (* -1 (* (pow lambda1 2) (pow (cos lambda2) 2))) (pow (cos lambda2) 2))
(*.f64 (fma.f64 (neg.f64 lambda1) lambda1 #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* 1/3 (* (pow lambda1 2) (pow (cos lambda2) 2))))) (pow (cos lambda2) 2))
(fma.f64 (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 lambda1 lambda1) #s(literal -1 binary64))) (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(+ (* (pow lambda1 2) (+ (* -1 (pow (cos lambda2) 2)) (* (pow lambda1 2) (+ (* -2/45 (* (pow lambda1 2) (pow (cos lambda2) 2))) (* 1/3 (pow (cos lambda2) 2)))))) (pow (cos lambda2) 2))
(fma.f64 (fma.f64 (neg.f64 lambda1) lambda1 #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 lambda1 lambda1) #s(literal 1/3 binary64)))))
(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 lambda1 (cos.f64 lambda2)) #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 phi2) (cos.f64 lambda2)) (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 (cos.f64 phi2) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 phi2) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2)) (cos.f64 phi1))) lambda1 (.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 (cos.f64 phi1) (sin.f64 lambda2)) (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 phi1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1)) lambda1 (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (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 lambda1 (cos.f64 lambda2)) #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 lambda1 (cos.f64 lambda2)) #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 #s(literal -1/6 binary64) (.f64 (sin.f64 lambda2) lambda1) (.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))))
(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 lambda1 (cos.f64 lambda2)) #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 #s(literal -1/6 binary64) (.f64 (sin.f64 lambda2) lambda1) (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(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 (- 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))))
(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))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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)))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(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 (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))))
(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))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(+ (* phi2 (sin phi1)) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi1) phi2))
(+ (* phi2 (+ (sin phi1) (* -1/2 (/ (* phi2 (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (fma.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))) (sin.f64 phi1)) phi2 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (* -1/6 (* phi2 (sin phi1))))))) (/ (* (cos phi1) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/6 binary64) phi2) (sin.f64 phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))) phi2 (sin.f64 phi1)) phi2 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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 (- 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 (sin.f64 phi1) phi2 (.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 #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 (sin.f64 phi1) phi2 (.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 #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))))
(* phi2 (sin phi1))
(*.f64 (sin.f64 phi1) phi2)
(* 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 (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 #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)
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (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)))))
(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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.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)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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))))
(* (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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.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)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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))))
(* (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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(+ (* phi1 (sin phi2)) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) phi1))
(+ (* phi1 (+ (sin phi2) (* -1/2 (/ (* phi1 (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (fma.f64 (.f64 phi1 #s(literal -1/2 binary64)) (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))) (sin.f64 phi2)) phi1 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))) (* -1/6 (* phi1 (sin phi2))))))) (/ (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3)))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/6 binary64))) phi1 (sin.f64 phi2)) phi1 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (/.f64 (cos.f64 phi2) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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 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 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/6 binary64))) 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 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (sin.f64 phi2) phi1) #s(literal -1/6 binary64))) 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 (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)
(+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (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)))))
(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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.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)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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))))
(* (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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.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)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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))))
(* (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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (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))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.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.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (- (* -3/2 (cos lambda1)) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (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 (- (+ (* -3/2 (cos lambda1)) (* lambda2 (- (/ (pow (sin lambda1) 3) (pow (cos lambda1) 2)) (+ (* -1 (/ (* (sin lambda1) (- (* -3/2 (cos lambda1)) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (cos lambda1))) (+ (/ (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))) (pow (cos lambda1) 2)) (/ (* (sin lambda1) (+ (* 1/6 (cos lambda1)) (* 1/2 (cos lambda1)))) (cos lambda1))))))) (+ (* -1 (cos lambda1)) (+ (* -1 (/ (pow (sin lambda1) 2) (cos lambda1))) (/ (pow (sin lambda1) 2) (cos lambda1)))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (fma.f64 (neg.f64 (sin.f64 lambda1)) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (fma.f64 (cos.f64 lambda1) (/.f64 #s(literal 2/3 binary64) (cos.f64 lambda1)) (/.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))))) lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (* (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 (- (* lambda2 (- (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) #s(literal -3/2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)))) (/.f64 (.f64 (.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1)))) 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))))
(+ (* lambda2 (- (* lambda2 (- (+ (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 3))) (pow (cos lambda1) 2)) (+ (* -1 (/ (* (sin lambda1) (- (* -3/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (cos lambda1))) (+ (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))) (pow (cos lambda1) 2)) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (+ (* 1/6 (cos lambda1)) (* 1/2 (cos lambda1)))))) (cos lambda1))))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (pow (sin lambda1) 2))) (cos lambda1))) (/ (* (cos phi1) (* (cos phi2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (cos lambda1))))) (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(fma.f64 (fma.f64 (fma.f64 (fma.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (-.f64 (.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) #s(literal -3/2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)))) (/.f64 (.f64 (.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1)))) (/.f64 (sin.f64 lambda1) (cos.f64 lambda1))) (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 phi2) (/.f64 (.f64 (.f64 (cos.f64 lambda1) #s(literal 2/3 binary64)) (sin.f64 lambda1)) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (/.f64 (.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (sin.f64 lambda1)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))))))) lambda2 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) #s(literal -3/2 binary64)) (cos.f64 phi2)) (cos.f64 phi1) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (cos.f64 lambda1)))) (/.f64 (.f64 (.f64 (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))) (cos.f64 phi2)) (cos.f64 phi1)) (cos.f64 lambda1))))) 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 (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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 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 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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(pow (cos lambda1) 3)
(pow.f64 (cos.f64 lambda1) #s(literal 3 binary64))
(+ (* -3/2 (* (pow lambda2 2) (pow (cos lambda1) 3))) (pow (cos lambda1) 3))
(.f64 (fma.f64 #s(literal -3/2 binary64) (.f64 lambda2 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(+ (* (pow lambda2 2) (+ (* -3/2 (pow (cos lambda1) 3)) (* 7/8 (* (pow lambda2 2) (pow (cos lambda1) 3))))) (pow (cos lambda1) 3))
(fma.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 7/8 binary64) (.f64 lambda2 lambda2) #s(literal -3/2 binary64))) (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(+ (* (pow lambda2 2) (+ (* -3/2 (pow (cos lambda1) 3)) (* (pow lambda2 2) (+ (* -61/240 (* (pow lambda2 2) (pow (cos lambda1) 3))) (* 7/8 (pow (cos lambda1) 3)))))) (pow (cos lambda1) 3))
(fma.f64 (fma.f64 #s(literal -3/2 binary64) (.f64 lambda2 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal -61/240 binary64) (.f64 lambda2 lambda2) #s(literal 7/8 binary64)))))
(* (pow lambda2 3) (pow (sin lambda1) 3))
(*.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)))
(* (pow lambda2 3) (+ (* -1/2 (* (pow lambda2 2) (pow (sin lambda1) 3))) (pow (sin lambda1) 3)))
(.f64 (.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (pow.f64 lambda2 #s(literal 3 binary64)))
(* (pow lambda2 3) (+ (* (pow lambda2 2) (+ (* -1/2 (pow (sin lambda1) 3)) (* 13/120 (* (pow lambda2 2) (pow (sin lambda1) 3))))) (pow (sin lambda1) 3)))
(.f64 (fma.f64 (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal 13/120 binary64) (.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (.f64 lambda2 lambda2) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64))) (pow.f64 lambda2 #s(literal 3 binary64)))
(* (pow lambda2 3) (+ (* (pow lambda2 2) (+ (* -1/2 (pow (sin lambda1) 3)) (* (pow lambda2 2) (+ (* -41/3024 (* (pow lambda2 2) (pow (sin lambda1) 3))) (* 13/120 (pow (sin lambda1) 3)))))) (pow (sin lambda1) 3)))
(.f64 (fma.f64 (fma.f64 (.f64 #s(literal -1/2 binary64) lambda2) lambda2 #s(literal 1 binary64)) (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (fma.f64 #s(literal -41/3024 binary64) (*.f64 lambda2 lambda2) #s(literal 13/120 binary64))))) (pow.f64 lambda2 #s(literal 3 binary64)))
(pow (cos lambda1) 2)
(pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))
(+ (* -1 (* (pow lambda2 2) (pow (cos lambda1) 2))) (pow (cos lambda1) 2))
(*.f64 (fma.f64 (neg.f64 lambda2) lambda2 #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* 1/3 (* (pow lambda2 2) (pow (cos lambda1) 2))))) (pow (cos lambda1) 2))
(fma.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (.f64 lambda2 lambda2) #s(literal -1 binary64))) (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))
(+ (* (pow lambda2 2) (+ (* -1 (pow (cos lambda1) 2)) (* (pow lambda2 2) (+ (* -2/45 (* (pow lambda2 2) (pow (cos lambda1) 2))) (* 1/3 (pow (cos lambda1) 2)))))) (pow (cos lambda1) 2))
(fma.f64 (fma.f64 (neg.f64 lambda2) lambda2 #s(literal 1 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (fma.f64 #s(literal -2/45 binary64) (*.f64 lambda2 lambda2) #s(literal 1/3 binary64)))))
(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 phi2)) (cos.f64 phi1) (.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))
(+ (* 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 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))))
(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))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(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 (- 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))))
(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))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/ (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))
(/.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1))))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))
(fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2))))))
(acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (.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))))
(.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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (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 (* 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)))))
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (cos lambda1) 3) (pow (cos lambda2) 3))
(*.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (sin lambda1) 3) (pow (sin lambda2) 3))
(*.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (pow (cos lambda2) 2))
(*.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(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 (+ 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))))
(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))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))
(-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.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 (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.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 (* 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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.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 (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
(* R (acos (+ (* (sin phi1) (sin phi2)) (/ (* (cos phi1) (* (cos phi2) (+ (* (pow (cos lambda1) 3) (pow (cos lambda2) 3)) (* (pow (sin lambda1) 3) (pow (sin lambda2) 3))))) (+ (* (sin lambda1) (* (sin lambda2) (- (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))) (* (pow (cos lambda1) 2) (pow (cos lambda2) 2)))))))
(.f64 (acos.f64 (fma.f64 (.f64 (fma.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)) (.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 3 binary64)))) (cos.f64 phi2)) (/.f64 (cos.f64 phi1) (fma.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)) (.f64 (.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 lambda2)) (sin.f64 lambda1)))) (*.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 (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))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.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))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.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))))))
(* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))
(.f64 (neg.f64 R) (fma.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))))))
(* -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 (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(* R (- (PI) (acos (neg (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2)))))))
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)

rewrite646.0ms (3.6%)

Memory

-34.3MiB live, 303.8MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	82	597
0	140	584
1	486	565
2	3577	565
0	8182	559

Stop Event

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

Counts

29 → 535

Calls

Call 1

Inputs
(/.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)))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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))))))))
(.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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))
(.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)
(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)))))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(fma.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))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(PI.f64)
(.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)
(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64))
(sqrt.f64 (PI.f64))
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))
(pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))
(pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))
#s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))
#s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1)))
(cos.f64 (-.f64 lambda1 lambda2))
#s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))
(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))))
(cos.f64 (-.f64 lambda2 lambda1))
(fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))

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

eval244.0ms (1.4%)

Memory: 7.4MiB live, 587.2MiB allocated
Compiler: Compiled 61 657 to 4 069 computations (93.4% saved)

prune215.0ms (1.2%)

Memory

-10.8MiB live, 553.0MiB allocated

Pruning

110 alts after pruning (105 fresh and 5 done)

	Pruned	Kept	Total
New	1 679	34	1 713
Fresh	12	71	83
Picked	3	2	5
Done	0	3	3
Total	1 694	110	1 804

Accuracy

94.4%

Counts

1 804 → 110

Alt Table

Click to see full alt table

Status	Accuracy	Program
	69.8%	(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R))
	52.0%	(fma.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 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	73.1%	(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)))
	53.2%	(fma.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)))) 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))
	52.6%	(fma.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 (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
	72.0%	(fma.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))
	53.1%	(fma.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 (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
	72.2%	(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (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))))))) R))
	52.9%	(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
	92.2%	(fma.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	92.2%	(fma.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 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	72.2%	(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
	40.2%	(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) R))
	42.1%	(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
	49.0%	(fma.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))
✓	52.9%	(fma.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))
	70.7%	(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R))
	52.9%	(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R (.f64 (.f64 R #s(literal 1/2 binary64)) (PI.f64)))
	71.9%	(fma.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R (*.f64 (PI.f64) R))
	72.2%	(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)))
	71.9%	(fma.f64 (PI.f64) R (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R))
	72.8%	(+.f64 (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (.f64 (PI.f64) R))
	70.1%	(.f64 (fma.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 6 binary64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	70.0%	(.f64 (fma.f64 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 5/4 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	69.9%	(.f64 (fma.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (sqrt.f64 (PI.f64))) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	70.8%	(.f64 (fma.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/12 binary64)) #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	69.3%	(.f64 (fma.f64 (pow.f64 (.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 3 binary64))) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	72.5%	(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (.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)
	90.6%	(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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)
	90.7%	(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.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))) (fma.f64 (neg.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)
	48.0%	(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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)
	54.5%	(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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)
	41.1%	(.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 phi1))))))) R)
	42.0%	(.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)
	24.6%	(.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)
	16.1%	(.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
	69.8%	(.f64 (fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	72.2%	(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 5/6 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	71.5%	(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 7/12 binary64)) (pow.f64 (PI.f64) #s(literal 5/12 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	52.0%	(.f64 (fma.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	41.5%	(.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 phi1))))))) R)
	42.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)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)))))) R)
	24.7%	(.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)
	16.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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) R)
	69.7%	(.f64 (fma.f64 (sqrt.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 4 binary64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	70.1%	(.f64 (fma.f64 (sqrt.f64 (.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 (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)
	70.8%	(.f64 (fma.f64 (sqrt.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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)
	72.2%	(.f64 (fma.f64 (sqrt.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 (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)
	72.5%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 phi2) (sin.f64 phi1)))))))) R)
	48.2%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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)
	70.7%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	70.3%	(.f64 (fma.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
	53.7%	(.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	43.0%	(.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 phi1))))))) R)
	43.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.3%	(.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)
	18.0%	(.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)
	92.8%	(.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 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	18.0%	(.f64 (/.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))))))) R)
	53.7%	(.f64 (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	92.7%	(.f64 (/.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 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.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 (.f64 (cos.f64 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)
	72.9%	(.f64 (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
	40.0%	(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	43.8%	(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	42.3%	(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
	73.2%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	53.8%	(.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) R)
	43.1%	(.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 phi1))))) R)
	48.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))) R)
	55.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
	73.1%	(.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)
	73.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.2%	(.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)
	50.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))))) R)
	53.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
	31.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (sqrt.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sqrt.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
	39.8%	(.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)
	30.7%	(.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 phi1))))) R)
	33.1%	(.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 phi1))))) R)
	53.0%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R)
	28.9%	(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
	28.7%	(.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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1))))) R)
	56.5%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) R)
	43.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)))) R)
	46.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 (sin.f64 phi1) phi2)))) R)
✓	93.2%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)
	53.8%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
	50.4%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
	53.7%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
	33.0%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) R)
	36.9%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
	36.0%	(.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)
	36.1%	(.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)
	40.1%	(.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)
	32.3%	(.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)
	34.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)
	26.3%	(.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 lambda2) (cos.f64 lambda1)))))) R)
	24.6%	(.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 lambda2) (sin.f64 lambda1)))))) R)
	31.6%	(.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 lambda2) (cos.f64 lambda1)))))) R)
	12.3%	(.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.6%	(.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 lambda2) (sin.f64 lambda1)))))) R)
	26.3%	(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))))) R)
	18.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 (fma.f64 (.f64 #s(literal -1/2 binary64) phi1) phi1 #s(literal 1 binary64)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
✓	26.3%	(.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)
	11.3%	(.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 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) R)
	11.9%	(.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)
	13.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)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))) R)
	17.1%	(.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)
✓	18.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)
	72.9%	(.f64 #s(approx (+ ( (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)

Compiler

Compiled 7 820 to 3 184 computations (59.3% saved)

regimes516.0ms (2.9%)

Memory

-3.3MiB live, 1 113.8MiB allocated

Counts

178 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.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 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 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)) (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 #s(approx (+ ( (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 #s(approx (+ ( (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.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 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)
(.f64 (/.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))))))) 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))) #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(fma.f64 (PI.f64) R (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #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))
(+.f64 (.f64 (PI.f64) R) (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R) (.f64 (PI.f64) R))
(+.f64 (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (.f64 (PI.f64) R))
(fma.f64 (asin.f64 (neg.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))
(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 (.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) 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)))
(.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))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 (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 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (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))))))) R))
(.f64 (acos.f64 (/.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)))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.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 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) 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)
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.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 (.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 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.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 (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(fma.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 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 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 (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)))) R)
(fma.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 (fma.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (.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 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 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 (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 phi1))))))) R)
(fma.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)))) 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))
(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 7/12 binary64)) (pow.f64 (PI.f64) #s(literal 5/12 binary64)) (neg.f64 (acos.f64 (neg.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 (pow.f64 (PI.f64) #s(literal 5/6 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 #s(literal 1/2 binary64) (cbrt.f64 (pow.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 (+.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 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (neg.f64 (acos.f64 (neg.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 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (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 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2))) (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)
(.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)) (cbrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.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 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/12 binary64)) #s(literal 2 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (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)
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R))
(fma.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (cbrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.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 #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 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.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 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(.f64 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (sqrt.f64 (PI.f64))) (neg.f64 (acos.f64 (neg.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 #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 (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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)
(fma.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 (fma.f64 (sqrt.f64 (.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (cbrt.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 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 phi2) (sin.f64 phi1)))))))) R)
(.f64 (fma.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (neg.f64 (acos.f64 (neg.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 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 5/4 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 6 binary64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (sqrt.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 4 binary64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (.f64 (fma.f64 (sqrt.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sqrt.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
(.f64 (fma.f64 (sqrt.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 (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 (sqrt.f64 (.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 (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 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (fma.f64 (pow.f64 (.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/12 binary64)) #s(literal 3 binary64))) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (fma.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)) (neg.f64 (acos.f64 (neg.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 (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 #s(literal 1/4 binary64) (.f64 (PI.f64) (PI.f64))) (pow.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(/.f64 (.f64 (-.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (acos.f64 (neg.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) (+.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1))))) (PI.f64)))
(/.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 (.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))))))) 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 #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)))))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi1)) (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (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 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))))) (cos.f64 phi1)))) R)
(.f64 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.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))) (fma.f64 (neg.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 (fma.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 5 binary64))) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (/.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)))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 phi2) phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) R)
(.f64 (-.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))))))) R)
(.f64 (/.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 phi2) (sin.f64 phi1))))) (.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 phi2) (sin.f64 phi1)))) #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 phi2) (sin.f64 phi1))))))) 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 (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 (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 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)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.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)))))))) 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 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (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 2 binary64)) (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 lambda1)) (sin.f64 lambda2))))) (cos.f64 phi1)) (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)) (fma.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2))))) (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 (pow.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (asin.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64))) (fma.f64 (PI.f64) #s(literal 1/2 binary64) (asin.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R)
(.f64 (/.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 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.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 (.f64 (cos.f64 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) (asin.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 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))) (fma.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (*.f64 (fma.f64 (cos.f64 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)

Calls

10 calls:

67.0ms	(-.f64 lambda1 lambda2)
53.0ms	lambda2
53.0ms	lambda1
50.0ms	phi1
49.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.2%	1	`R`
93.2%	1	`lambda1`
93.2%	1	`lambda2`
93.2%	1	`phi1`
93.2%	1	`phi2`
93.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)`
93.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)))))`
93.2%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
93.2%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
93.2%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes350.0ms (2%)

Memory

12.5MiB live, 808.7MiB allocated

Counts

126 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.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 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 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)) (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 #s(approx (+ ( (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 #s(approx (+ ( (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.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 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)
(.f64 (/.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))))))) 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))) #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(fma.f64 (PI.f64) R (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #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))
(+.f64 (.f64 (PI.f64) R) (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R) (.f64 (PI.f64) R))
(+.f64 (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (.f64 (PI.f64) R))
(fma.f64 (asin.f64 (neg.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))
(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 (.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) 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)))
(.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))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 (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 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (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))))))) R))
(.f64 (acos.f64 (/.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)))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.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 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) 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)
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.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 (.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 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.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 (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(fma.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 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 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 (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)))) R)
(fma.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 (fma.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (.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 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (pow.f64 (pow.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)) #s(literal 2 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 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 (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 phi1))))))) R)
(fma.f64 (.f64 #s(literal 1/2 binary64) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3 binary64)))) 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))
(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 7/12 binary64)) (pow.f64 (PI.f64) #s(literal 5/12 binary64)) (neg.f64 (acos.f64 (neg.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 (pow.f64 (PI.f64) #s(literal 5/6 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 #s(literal 1/2 binary64) (cbrt.f64 (pow.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 (+.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 (fma.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (PI.f64) #s(literal 1/4 binary64)) (sqrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (neg.f64 (acos.f64 (neg.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 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 5/3 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (neg.f64 (acos.f64 (neg.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 (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 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))) R)
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 (/.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))

Outputs

(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)))) R)

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

Calls

10 calls:

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

Results

Accuracy	Segments	Branch
73.2%	1	`R`
73.2%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
73.2%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
75.0%	2	`(-.f64 lambda1 lambda2)`
75.8%	2	`lambda1`
77.2%	2	`lambda2`
83.4%	3	`phi1`
73.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)`
82.9%	3	`phi2`
73.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)

regimes35.0ms (0.2%)

Memory

8.4MiB live, 84.1MiB allocated

Counts

105 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.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 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 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)) (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 #s(approx (+ ( (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 #s(approx (+ ( (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.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 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)
(.f64 (/.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))))))) 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))) #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(fma.f64 (PI.f64) R (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #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))
(+.f64 (.f64 (PI.f64) R) (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R) (.f64 (PI.f64) R))
(+.f64 (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (.f64 (PI.f64) R))
(fma.f64 (asin.f64 (neg.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))
(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 (.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) 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)))
(.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))
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 (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 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi1))) (cos.f64 phi2)) #s(literal 2 binary64)))) R)
(fma.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) R (.f64 (neg.f64 (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))))))) R))
(.f64 (acos.f64 (/.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)))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (neg.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 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) 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)
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (neg.f64 (acos.f64 (neg.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 (.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 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) R))
(fma.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 (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R))
(fma.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 (fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (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 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 (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (.f64 (sin.f64 phi1) phi2)))) R)

Outputs

(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)

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

Calls

1 calls:

30.0ms

phi1

Results

Accuracy	Segments	Branch
83.3%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes30.0ms (0.2%)

Memory

-12.9MiB live, 67.6MiB allocated

Counts

83 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.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 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 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)) (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 #s(approx (+ ( (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 #s(approx (+ ( (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.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 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)
(.f64 (/.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))))))) 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))) #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(fma.f64 (PI.f64) R (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #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))
(+.f64 (.f64 (PI.f64) R) (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R) (.f64 (PI.f64) R))
(+.f64 (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (.f64 (PI.f64) R))
(fma.f64 (asin.f64 (neg.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))
(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)))

Outputs

(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)

(fma.f64 (asin.f64 (neg.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))

Calls

1 calls:

26.0ms

phi1

Results

Accuracy	Segments	Branch
83.3%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes26.0ms (0.1%)

Memory

28.4MiB live, 66.5MiB allocated

Counts

81 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.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 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 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)) (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 #s(approx (+ ( (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 #s(approx (+ ( (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.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 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)
(.f64 (/.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))))))) 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))) #s(literal 1/2 binary64) (.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2)))) R)
(fma.f64 (PI.f64) R (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R (*.f64 (PI.f64) R))
(fma.f64 (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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 #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))
(+.f64 (.f64 (PI.f64) R) (.f64 (neg.f64 (acos.f64 (neg.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 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R) (.f64 (PI.f64) R))
(+.f64 (.f64 (neg.f64 (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1)) (cos.f64 phi2) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))) R) (.f64 (PI.f64) R))

Outputs

(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)

(*.f64 #s(approx (+ (* (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)

Calls

1 calls:

22.0ms

phi1

Results

Accuracy	Segments	Branch
83.3%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes24.0ms (0.1%)

Memory

-22.6MiB live, 57.4MiB allocated

Counts

69 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.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 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 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)) (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 #s(approx (+ ( (sqrt (pow (cbrt (PI)) 5)) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 #s(approx (+ ( (pow (sqrt (PI)) 5/3) (pow (PI) 1/6)) (neg (acos (neg (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1))))))) (-.f64 (PI.f64) (acos.f64 (neg.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (neg.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 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (fma.f64 (.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (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))) #s(literal 1/2 binary64) (.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)))) R)

Outputs

(*.f64 (acos.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)

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

Calls

1 calls:

19.0ms

phi1

Results

Accuracy	Segments	Branch
83.3%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes20.0ms (0.1%)

Memory

12.8MiB live, 51.3MiB allocated

Counts

61 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)
(.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)

Outputs

(*.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 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)

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

Calls

1 calls:

17.0ms

phi1

Results

Accuracy	Segments	Branch
83.3%	3	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes73.0ms (0.4%)

Memory

-17.2MiB live, 178.3MiB allocated

Counts

60 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)) (/ 1 (/ (+ (* (* (sin lambda2) (sin lambda1)) (- (* (sin lambda2) (sin lambda1)) (* (cos lambda2) (cos lambda1)))) (pow (* (cos lambda2) (cos lambda1)) 2)) (+ (pow (* (sin lambda2) (sin lambda1)) 3) (pow (* (cos lambda2) (cos lambda1)) 3)))))) (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 (- lambda1 lambda2)) (cos.f64 lambda2)) (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) R)

Outputs

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) 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)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)

Calls

4 calls:

18.0ms	lambda2
17.0ms	phi2
17.0ms	phi1
17.0ms	lambda1

Results

Accuracy	Segments	Branch
75.7%	3	`lambda1`
77.2%	3	`lambda2`
77.7%	4	`phi2`
77.9%	4	`phi1`

Compiler

Compiled 4 to 20 computations (-400% saved)

regimes19.0ms (0.1%)

Memory

10.7MiB live, 49.1MiB allocated

Counts

55 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (cos.f64 lambda1) (.f64 (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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) 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)) (cos (- lambda1 lambda2)))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)

Calls

1 calls:

16.0ms

lambda2

Results

Accuracy	Segments	Branch
77.2%	3	`lambda2`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes147.0ms (0.8%)

Memory

21.2MiB live, 341.0MiB allocated

Counts

51 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (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 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.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)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.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 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 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)

Calls

9 calls:

25.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)
16.0ms	lambda2
15.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
15.0ms	phi2
15.0ms	(acos.f64 (+.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
74.9%	3	`phi2`
60.8%	3	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
65.9%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
58.2%	2	`R`
58.2%	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)`
60.8%	3	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
69.0%	4	`phi1`
66.4%	2	`(-.f64 lambda1 lambda2)`
75.9%	3	`lambda2`

Compiler

Compiled 63 to 81 computations (-28.6% saved)

regimes48.0ms (0.3%)

Memory

-0.5MiB live, 117.6MiB allocated

Counts

50 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)

(*.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)

Calls

3 calls:

15.0ms	lambda2
15.0ms	phi2
15.0ms	lambda1

Results

Accuracy	Segments	Branch
74.0%	3	`phi2`
73.8%	3	`lambda1`
58.2%	2	`lambda2`

Compiler

Compiled 3 to 15 computations (-400% saved)

regimes60.0ms (0.3%)

Memory

-10.9MiB live, 145.8MiB allocated

Counts

49 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 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

4 calls:

15.0ms	lambda1
14.0ms	phi2
14.0ms	(-.f64 lambda1 lambda2)
14.0ms	phi1

Results

Accuracy	Segments	Branch
61.9%	2	`phi1`
55.4%	2	`(-.f64 lambda1 lambda2)`
53.8%	1	`lambda1`
65.9%	2	`phi2`

Compiler

Compiled 6 to 21 computations (-250% saved)

regimes117.0ms (0.7%)

Memory

4.5MiB live, 279.1MiB allocated

Counts

48 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) (cos.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 (sin.f64 phi2) (sin.f64 phi1) #s(approx (* (* (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)))) #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 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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

8 calls:

17.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)
14.0ms	(cos.f64 (-.f64 lambda1 lambda2))
14.0ms	phi2
14.0ms	R
14.0ms	lambda2

Results

Accuracy	Segments	Branch
45.6%	2	`R`
45.6%	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)`
48.2%	3	`lambda2`
43.9%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
43.9%	1	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
56.2%	2	`phi1`
43.9%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
56.2%	2	`phi2`

Compiler

Compiled 60 to 75 computations (-25% saved)

regimes15.0ms (0.1%)

Memory

0.6MiB live, 38.8MiB allocated

Counts

45 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.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 #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 lambda2) (sin.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)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 #s(approx ( (sin phi1) (sin phi2)) (.f64 (sin.f64 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)))) (.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi1)))) 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 phi1))))))) R)
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi1) phi2))))) R))
(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) #s(approx ( (sin phi2) (sin phi1)) (*.f64 (sin.f64 phi2) phi1))))) 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)

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

13.0ms

phi1

Results

Accuracy	Segments	Branch
56.2%	2	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes12.0ms (0.1%)

Memory

-8.6MiB live, 30.0MiB allocated

Counts

34 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 #s(approx (/ (- (pow ( (sin phi2) (sin phi1)) 2) (pow (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) 2)) (neg (+ (* (* (neg (cos phi1)) (cos (- lambda2 lambda1))) (cos phi2)) (* (sin phi2) (sin phi1))))) (*.f64 (neg.f64 (cos.f64 phi2)) (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)))) (*.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)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) phi2)))) R)
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) phi1)))) 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 (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)))) #s(approx (* (cos (- lambda1 lambda2)) (cos phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) lambda1 (sin.f64 lambda2)) lambda1 (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)) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 lambda2) (sin.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)) (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)) #s(approx (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 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)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (cos.f64 phi1))))) 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 phi1))))) 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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 #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

1 calls:

10.0ms

phi1

Results

Accuracy	Segments	Branch
56.2%	2	`phi1`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes37.0ms (0.2%)

Memory

15.0MiB live, 95.0MiB allocated

Counts

14 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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

7 calls:

6.0ms	(-.f64 lambda1 lambda2)
6.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)
5.0ms	phi2
5.0ms	R
5.0ms	phi1

Results

Accuracy	Segments	Branch
43.9%	1	`R`
43.9%	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)`
43.9%	1	`lambda2`
43.9%	1	`lambda1`
43.9%	1	`(-.f64 lambda1 lambda2)`
43.9%	1	`phi2`
43.9%	1	`phi1`

Compiler

Compiled 27 to 48 computations (-77.8% saved)

regimes50.0ms (0.3%)

Memory

12.2MiB live, 130.2MiB allocated

Counts

13 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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:

6.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	(cos.f64 (-.f64 lambda1 lambda2))
5.0ms	phi1
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	(.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
43.9%	2	`lambda1`
43.9%	2	`lambda2`
34.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.4%	2	`(-.f64 lambda1 lambda2)`
34.5%	1	`R`
40.8%	2	`phi1`
34.5%	1	`phi2`
34.5%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
36.5%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
34.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)`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes9.0ms (0.1%)

Memory

-14.9MiB live, 23.9MiB allocated

Counts

10 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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:

4.0ms	lambda2
4.0ms	lambda1

Results

Accuracy	Segments	Branch
36.7%	2	`lambda1`
40.8%	2	`lambda2`

Compiler

Compiled 2 to 10 computations (-400% saved)

regimes38.0ms (0.2%)

Memory

25.4MiB live, 103.1MiB allocated

Counts

9 → 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))))) 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:

4.0ms	phi2
4.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
4.0ms	(-.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	lambda2

Results

Accuracy	Segments	Branch
26.3%	1	`R`
26.3%	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.3%	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.3%	1	`phi2`
26.3%	1	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
26.3%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
26.3%	1	`lambda1`
26.3%	1	`(-.f64 lambda1 lambda2)`
26.3%	1	`phi1`
26.3%	1	`lambda2`

Compiler

Compiled 64 to 86 computations (-34.4% saved)

regimes20.0ms (0.1%)

Memory

-23.5MiB live, 55.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:

3.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
2.0ms	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 (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	phi2

Results

Accuracy	Segments	Branch
26.2%	2	`lambda1`
18.0%	1	`phi2`
26.3%	2	`lambda2`
18.0%	1	`phi1`
18.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)))))`
18.0%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
18.0%	1	`(-.f64 lambda1 lambda2)`
18.0%	1	`R`
18.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)`
18.0%	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)

regimes8.0ms (0%)

Memory

25.0MiB live, 25.0MiB 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

5 calls:

2.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
1.0ms	lambda2
1.0ms	phi1
1.0ms	lambda1
1.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

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

Compiler

Compiled 23 to 37 computations (-60.9% saved)

bsearch120.0ms (0.7%)

Memory

-26.6MiB live, 288.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
65.0ms	2.980150444821809e-14	1.601577625427325e-7
45.0ms	-7.88271333896609e-8	-6.799903054581712e-9

Samples

90.0ms	200×	1	valid
8.0ms	40×	0	valid

Compiler

Compiled 661 to 610 computations (7.7% saved)

Precisions

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

ival-cos: 31.0ms (36.3% of total)

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

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

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

adjust: 7.0ms (8.2% of total)

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

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

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

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

bsearch71.0ms (0.4%)

Memory

18.8MiB live, 178.2MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
29.0ms	2.980150444821809e-14	1.601577625427325e-7
37.0ms	-7.88271333896609e-8	-6.799903054581712e-9

Samples

52.0ms	115×	1	valid
6.0ms	29×	0	valid

Compiler

Compiled 601 to 580 computations (3.5% saved)

Precisions

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

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

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

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

ival-acos: 6.0ms (12% of total)

adjust: 5.0ms (10% of total)

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

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

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

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

bsearch21.0ms (0.1%)

Memory

-19.3MiB live, 19.9MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
19.0ms	2.980150444821809e-14	1.601577625427325e-7
1.0ms	-7.88271333896609e-8	-6.799903054581712e-9

Samples

16.0ms	13×	1	valid
1.0ms	3×	0	valid

Compiler

Compiled 601 to 580 computations (3.5% saved)

Precisions

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

ival-cos: 2.0ms (39% of total)

adjust: 1.0ms (19.5% of total)

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

ival-sin: 1.0ms (19.5% of total)

ival-acos: 1.0ms (19.5% 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)

bsearch3.0ms (0%)

Memory

6.6MiB live, 6.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.980150444821809e-14	1.601577625427325e-7
1.0ms	-7.88271333896609e-8	-6.799903054581712e-9

Compiler

Compiled 592 to 580 computations (2% saved)

bsearch3.0ms (0%)

Memory

5.7MiB live, 5.7MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.980150444821809e-14	1.601577625427325e-7
1.0ms	-7.88271333896609e-8	-6.799903054581712e-9

Compiler

Compiled 547 to 535 computations (2.2% saved)

bsearch3.0ms (0%)

Memory

4.7MiB live, 4.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.980150444821809e-14	1.601577625427325e-7
1.0ms	-7.88271333896609e-8	-6.799903054581712e-9

Compiler

Compiled 547 to 535 computations (2.2% saved)

bsearch187.0ms (1.1%)

Memory

15.4MiB live, 276.3MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
74.0ms	4.6341261197215904e-42	1.1383281408798642e-38
101.0ms	-1.221095855786777e-11	-2.8905885950536256e-27

Samples

106.0ms	180×	1	valid
52.0ms	108×	0	valid

Compiler

Compiled 634 to 637 computations (-0.5% saved)

Precisions

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

ival-cos: 72.0ms (51.4% of total)

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

ival-acos: 21.0ms (15% of total)

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

adjust: 7.0ms (5% of total)

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

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

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

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

bsearch3.0ms (0%)

Memory

10.2MiB live, 10.2MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.6341261197215904e-42	1.1383281408798642e-38
1.0ms	-1.221095855786777e-11	-2.8905885950536256e-27

Compiler

Compiled 634 to 637 computations (-0.5% saved)

bsearch91.0ms (0.5%)

Memory

-18.7MiB live, 214.1MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.6341261197215904e-42	1.1383281408798642e-38
84.0ms	-2.0355456607908405e+33	-122208708.8845596

Samples

53.0ms	83×	1	valid
22.0ms	93×	0	valid

Compiler

Compiled 668 to 671 computations (-0.4% saved)

Precisions

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

ival-cos: 31.0ms (47% of total)

ival-sin: 15.0ms (22.8% of total)

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

adjust: 5.0ms (7.6% of total)

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

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

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

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

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

bsearch189.0ms (1.1%)

Memory

2.5MiB live, 408.1MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
100.0ms	1.9989364322240665e-6	1726582810422.978
78.0ms	-8737109.816846156	-8.693583616524654e-13

Samples

128.0ms	202×	1	valid
34.0ms	118×	0	valid

Compiler

Compiled 702 to 705 computations (-0.4% saved)

Precisions

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

ival-cos: 72.0ms (51% of total)

ival-sin: 31.0ms (21.9% of total)

ival-mult: 15.0ms (10.6% of total)

ival-acos: 10.0ms (7.1% of total)

adjust: 8.0ms (5.7% of total)

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

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

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

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

bsearch50.0ms (0.3%)

Memory

21.2MiB live, 97.6MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
47.0ms	1.9989364322240665e-6	1726582810422.978

Samples

35.0ms	72×	1	valid
7.0ms	40×	0	valid

Compiler

Compiled 302 to 325 computations (-7.6% saved)

Precisions

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

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

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

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

adjust: 3.0ms (8.4% of total)

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

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

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

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

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

bsearch65.0ms (0.4%)

Memory

-23.3MiB live, 133.4MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
59.0ms	-3.2285895668990606e-9	-8.158965866844961e-13

Samples

48.0ms	101×	1	valid
5.0ms	27×	0	valid

Compiler

Compiled 342 to 313 computations (8.5% saved)

Precisions

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

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

ival-sin: 14.0ms (29.8% of total)

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

ival-acos: 6.0ms (12.8% of total)

adjust: 4.0ms (8.5% of total)

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

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

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

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

bsearch42.0ms (0.2%)

Memory

11.3MiB live, 90.1MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
39.0ms	-6.799903054581712e-9	-3.2285895668990606e-9

Samples

31.0ms	63×	1	valid
3.0ms	17×	0	valid

Compiler

Compiled 162 to 175 computations (-8% saved)

Precisions

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

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

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

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

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

adjust: 3.0ms (10% of total)

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

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

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

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

bsearch1.0ms (0%)

Memory

3.6MiB live, 3.7MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	-3.2285895668990606e-9	-8.158965866844961e-13

Compiler

Compiled 198 to 233 computations (-17.7% saved)

bsearch54.0ms (0.3%)

Memory

0.6MiB live, 118.4MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
51.0ms	2.4143779866722602e-43	4.6341261197215904e-42

Samples

34.0ms	70×	1	valid
12.0ms	42×	0	valid

Compiler

Compiled 162 to 207 computations (-27.8% saved)

Precisions

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

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

ival-sin: 10.0ms (25.4% of total)

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

adjust: 3.0ms (7.6% of total)

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

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

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

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

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

bsearch76.0ms (0.4%)

Memory

-6.3MiB live, 150.7MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
63.0ms	1.6683254441354078e-21	9.57903819847654e-15

Samples

45.0ms	88×	1	valid
11.0ms	56×	0	valid

Compiler

Compiled 184 to 250 computations (-35.9% saved)

Precisions

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

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

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

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

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

adjust: 3.0ms (6.2% of total)

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

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

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

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

bsearch1.0ms (0%)

Memory

3.1MiB live, 3.1MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
1.0ms	2.4143779866722602e-43	4.6341261197215904e-42

Compiler

Compiled 134 to 193 computations (-44% saved)

simplify38.0ms (0.2%)

Memory

5.6MiB live, 83.3MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	213	1605
1	273	1605
2	292	1605
3	306	1605
4	312	1605
5	313	1605

Stop Event

1×

saturated

Calls

Call 1

Inputs
(.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)
(if (<=.f64 phi1 #s(literal -2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 3022314549036573/18889465931478580854784 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)))) R) (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))))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (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))))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (fma.f64 (asin.f64 (neg.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))))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (.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)))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.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) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (.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)))
(if (<=.f64 lambda2 #s(literal -3713820117856141/309485009821345068724781056 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)))
(if (<=.f64 lambda2 #s(literal -3713820117856141/309485009821345068724781056 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 lambda2 #s(literal -124000000 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal -2833419889721787/1180591620717411303424 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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 7673845534663173/590295810358705651712 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal 6456360425798343/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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 -7737125245533627/2417851639229258349412352 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 phi1 #s(literal -8099802991418015/1208925819614629174706176 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 (+.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 phi1 #s(literal -7737125245533627/2417851639229258349412352 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 7218666995694683/1569275433846670190958947355801916604025588861116008628224 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 3010670175542045/316912650057057350374175801344 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 7218666995694683/1569275433846670190958947355801916604025588861116008628224 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 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (fma.f64 (cos.f64 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)
(.f64 R (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(if (<=.f64 phi1 #s(literal -2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 3022314549036573/18889465931478580854784 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (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)))) R) (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))))
(if (<=.f64 phi1 #s(literal -2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi1 #s(literal 3022314549036573/18889465931478580854784 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2) (.f64 (sin.f64 phi2) phi1)))) R) (fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) 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))))))))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (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))))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi1 #s(literal 2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (fma.f64 (.f64 (PI.f64) #s(literal 1/2 binary64)) 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))))))))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (fma.f64 (asin.f64 (neg.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))))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (fma.f64 (asin.f64 (neg.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 (PI.f64) #s(literal 1/2 binary64)) R))))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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)))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi1 #s(literal 2833419889721787/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (.f64 #s(approx (+ ( (sqrt (PI)) (* (sqrt (PI)) 1/2)) (neg (asin (+ (* (* (cos (- lambda2 lambda1)) (cos phi1)) (cos phi2)) (* (sin phi2) (sin phi1)))))) (-.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 phi1) (sin.f64 phi2)))))) R)))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi2) (sin.f64 phi1)))) R) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (.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)))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (.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)))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 binary64)) (.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) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (.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)))
(if (<=.f64 phi1 #s(literal -4352132950612665/604462909807314587353088 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) (if (<=.f64 phi1 #s(literal 2568967366681087/37778931862957161709568 binary64)) (.f64 (acos.f64 #s(approx (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (.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)))
(if (<=.f64 lambda2 #s(literal -3713820117856141/309485009821345068724781056 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda2))))) R)))
(if (<=.f64 lambda2 #s(literal -3713820117856141/309485009821345068724781056 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))) R)))
(if (<=.f64 lambda2 #s(literal -3713820117856141/309485009821345068724781056 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 lambda2 #s(literal -3713820117856141/309485009821345068724781056 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1))))) (.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.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 phi2) (cos.f64 lambda2)) (cos.f64 phi1))))) R)))
(if (<=.f64 lambda2 #s(literal -124000000 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 lambda2 #s(literal -124000000 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (cos.f64 phi1)))) R) (if (<=.f64 lambda2 #s(literal 4290987514424489/383123885216472214589586756787577295904684780545900544 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) (.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 phi2) (cos.f64 lambda2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal -2833419889721787/1180591620717411303424 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 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 7673845534663173/590295810358705651712 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal -2833419889721787/1180591620717411303424 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 phi2) (cos.f64 lambda2)) (cos.f64 phi1))))) R) (if (<=.f64 phi2 #s(literal 7673845534663173/590295810358705651712 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (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) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 phi1))))) R)))
(if (<=.f64 phi2 #s(literal 6456360425798343/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 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 6456360425798343/9223372036854775808 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) R))
(if (<=.f64 phi1 #s(literal -7737125245533627/2417851639229258349412352 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 phi1 #s(literal -7737125245533627/2417851639229258349412352 binary64)) (.f64 (acos.f64 #s(approx (+ ( (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (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 phi1 #s(literal -8099802991418015/1208925819614629174706176 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 (+.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 phi1 #s(literal -8099802991418015/1208925819614629174706176 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 (+.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 phi1 #s(literal -7737125245533627/2417851639229258349412352 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 7218666995694683/1569275433846670190958947355801916604025588861116008628224 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 3010670175542045/316912650057057350374175801344 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 7218666995694683/1569275433846670190958947355801916604025588861116008628224 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 (8.4%)

Memory

46.2MiB live, 1 455.8MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	372	18273
1	1174	18019
2	3418	17726
3	6190	17724
0	8235	16607
0	789	27834
1	2684	27256
2	6554	27249
0	8309	26201
0	68	483
0	119	437
1	425	371
2	3004	371
0	9992	368
0	219	4017
1	686	3929
2	2188	3840
3	3633	3804
0	8012	3588
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×	iter limit
1×	node limit
1×	iter limit
1×	node limit

Compiler

Compiled 2 404 to 1 390 computations (42.2% saved)

preprocess256.0ms (1.4%)

Memory

-10.9MiB live, 427.9MiB allocated

Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 2 102 to 642 computations (69.5% 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%)

analyze899.0ms (5.1%)

sample4.8s (26.8%)

explain371.0ms (2.1%)

preprocess238.0ms (1.3%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify9.0ms (0%)

localize141.0ms (0.8%)

series42.0ms (0.2%)

simplify205.0ms (1.2%)

rewrite201.0ms (1.1%)

eval75.0ms (0.4%)

prune66.0ms (0.4%)

simplify140.0ms (0.8%)

localize540.0ms (3%)

series214.0ms (1.2%)

simplify303.0ms (1.7%)

rewrite251.0ms (1.4%)

eval521.0ms (2.9%)

prune176.0ms (1%)

simplify346.0ms (1.9%)

localize516.0ms (2.9%)

series154.0ms (0.9%)

simplify253.0ms (1.4%)

rewrite220.0ms (1.2%)

eval273.0ms (1.5%)

prune182.0ms (1%)

simplify107.0ms (0.6%)

localize512.0ms (2.9%)

series239.0ms (1.3%)

simplify286.0ms (1.6%)

rewrite646.0ms (3.6%)

eval244.0ms (1.4%)

prune215.0ms (1.2%)

regimes516.0ms (2.9%)

regimes350.0ms (2%)

regimes35.0ms (0.2%)

regimes30.0ms (0.2%)

regimes26.0ms (0.1%)

regimes24.0ms (0.1%)

regimes20.0ms (0.1%)

regimes73.0ms (0.4%)

regimes19.0ms (0.1%)

regimes147.0ms (0.8%)

regimes48.0ms (0.3%)

regimes60.0ms (0.3%)

regimes117.0ms (0.7%)

regimes15.0ms (0.1%)

regimes12.0ms (0.1%)

regimes37.0ms (0.2%)

regimes50.0ms (0.3%)

regimes9.0ms (0.1%)

regimes38.0ms (0.2%)

regimes20.0ms (0.1%)

regimes8.0ms (0%)

bsearch120.0ms (0.7%)

bsearch71.0ms (0.4%)

bsearch21.0ms (0.1%)

bsearch3.0ms (0%)

bsearch3.0ms (0%)

bsearch3.0ms (0%)

bsearch187.0ms (1.1%)

bsearch3.0ms (0%)

bsearch91.0ms (0.5%)

bsearch189.0ms (1.1%)

bsearch50.0ms (0.3%)

bsearch65.0ms (0.4%)

bsearch42.0ms (0.2%)

bsearch1.0ms (0%)

bsearch54.0ms (0.3%)

bsearch76.0ms (0.4%)

bsearch1.0ms (0%)

simplify38.0ms (0.2%)

soundness1.5s (8.4%)

preprocess256.0ms (1.4%)

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