Metrics for Spherical law of cosines

analyze1.1s (4.6%)

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 25 to 18 computations (28% saved)

Precisions

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

ival-mult: 184.0ms (29.9% of total)

ival-cos: 170.0ms (27.6% of total)

ival-sin: 158.0ms (25.7% of total)

ival-acos: 53.0ms (8.6% of total)

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

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

const: 3.0ms (0.5% of total)

backward-pass: 2.0ms (0.3% of total)

sample5.1s (21.3%)

Results

4.0s	6261×	1	valid
504.0ms	1979×	0	valid
36.0ms	16×	2	valid

Precisions

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

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

ival-sin: 1.1s (28.3% of total)

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

ival-acos: 309.0ms (8.2% of total)

backward-pass: 230.0ms (6.1% of total)

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

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

const: 9.0ms (0.2% of total)

Bogosity

preprocess97.0ms (0.4%)

Algorithm

2×	egg-herbie

Rules

2690×	`sum3-define`
1838×	`fma-define`
1596×	`fnmadd-define`
1144×	`fnmsub-define`
884×	`fmsub-define`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	130	391
1	290	391
2	537	383
3	1002	383
4	2119	383
5	4429	383
6	5516	383
7	6808	383
0	17	18
1	27	18
2	43	18
3	56	18
4	67	18
5	100	18
6	159	18
7	247	18
8	332	18
9	439	18
10	517	18
11	523	18
0	523	18

Stop Event

1×	iter limit
1×	saturated
1×	node limit

Calls

Call 1

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

Outputs

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

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

Call 2

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

Outputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R)
(* R (acos (fma (sin phi1) (sin phi2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (neg R))
(* (neg R) (acos (fma (sin phi1) (sin phi2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- (neg lambda1) lambda2))))) R)
(* R (acos (fma (cos phi1) (* (cos phi2) (cos (+ lambda1 lambda2))) (* (sin phi1) (sin phi2)))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 (neg lambda2)))))) R)
(* R (acos (fma (cos phi1) (* (cos phi2) (cos (+ lambda1 lambda2))) (* (sin phi1) (sin phi2)))))
(* (acos (+ (* (sin (neg phi1)) (sin phi2)) (* (* (cos (neg phi1)) (cos phi2)) (cos (- lambda1 lambda2))))) R)
(* R (acos (fmsub (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))))
(* (acos (+ (* (sin phi1) (sin (neg phi2))) (* (* (cos phi1) (cos (neg phi2))) (cos (- lambda1 lambda2))))) R)
(* R (acos (fmsub (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))))
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (neg R)))
(* R (acos (fma (sin phi1) (sin phi2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- (neg lambda1) lambda2))))) R))
(* (neg R) (acos (fma (cos phi1) (* (cos phi2) (cos (+ lambda1 lambda2))) (* (sin phi1) (sin phi2)))))
(neg (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 (neg lambda2)))))) R))
(* (neg R) (acos (fma (cos phi1) (* (cos phi2) (cos (+ lambda1 lambda2))) (* (sin phi1) (sin phi2)))))
(neg (* (acos (+ (* (sin (neg phi1)) (sin phi2)) (* (* (cos (neg phi1)) (cos phi2)) (cos (- lambda1 lambda2))))) R))
(* (neg R) (acos (fmsub (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))))
(neg (* (acos (+ (* (sin phi1) (sin (neg phi2))) (* (* (cos phi1) (cos (neg phi2))) (cos (- lambda1 lambda2))))) R))
(* (neg R) (acos (fmsub (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))) (* (sin phi1) (sin phi2)))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- R lambda2))))) lambda1)
(* lambda1 (acos (fma (* (cos phi1) (cos phi2)) (cos (- R lambda2)) (* (sin phi1) (sin phi2)))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 R))))) lambda2)
(* lambda2 (acos (fma (sin phi1) (sin phi2) (* (cos phi2) (* (cos phi1) (cos (- lambda1 R)))))))
(* (acos (+ (* (sin R) (sin phi2)) (* (* (cos R) (cos phi2)) (cos (- lambda1 lambda2))))) phi1)
(* phi1 (acos (fma (sin phi2) (sin R) (* (cos phi2) (* (cos (- lambda1 lambda2)) (cos R))))))
(* (acos (+ (* (sin phi1) (sin R)) (* (* (cos phi1) (cos R)) (cos (- lambda1 lambda2))))) phi2)
(* phi2 (acos (fma (cos phi1) (* (cos (- lambda1 lambda2)) (cos R)) (* (sin phi1) (sin R)))))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda2 lambda1))))) R)
(* R (acos (fma (sin phi1) (sin phi2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(* (acos (+ (* (sin lambda1) (sin phi2)) (* (* (cos lambda1) (cos phi2)) (cos (- phi1 lambda2))))) R)
(* R (acos (fma (cos phi2) (* (cos lambda1) (cos (- phi1 lambda2))) (* (sin phi2) (sin lambda1)))))
(* (acos (+ (* (sin phi1) (sin lambda1)) (* (* (cos phi1) (cos lambda1)) (cos (- phi2 lambda2))))) R)
(* R (acos (fma (cos phi1) (* (cos lambda1) (cos (- phi2 lambda2))) (* (sin phi1) (sin lambda1)))))
(* (acos (+ (* (sin lambda2) (sin phi2)) (* (* (cos lambda2) (cos phi2)) (cos (- lambda1 phi1))))) R)
(* R (acos (fma (cos phi2) (* (cos lambda2) (cos (- lambda1 phi1))) (* (sin phi2) (sin lambda2)))))
(* (acos (+ (* (sin phi1) (sin lambda2)) (* (* (cos phi1) (cos lambda2)) (cos (- lambda1 phi2))))) R)
(* R (acos (fma (sin phi1) (sin lambda2) (* (cos phi1) (* (cos lambda2) (cos (- lambda1 phi2)))))))
(* (acos (+ (* (sin phi2) (sin phi1)) (* (* (cos phi2) (cos phi1)) (cos (- lambda1 lambda2))))) R)
(* R (acos (fma (sin phi1) (sin phi2) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))

Symmetry

(negabs R)

(sort lambda1 lambda2)

(sort phi1 phi2)

explain514.0ms (2.2%)

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
65	116	(4.352606485455716e-241 -2.045187113280979e+174 -8.734641504732461e-39 -8.734789601254801e-302 8.512008500787773e+91)	0	-	`(cos.f64 (-.f64 lambda1 lambda2))`
23	2	(4.814121281909628e+254 -3.180291458051245e-243 293186.0882295232 -0.0025574627385317114 1.4565004896691928e-99)	1	(2.427129571701925e-76 -4.286288449368504e-181 3.9140789867586117e-115 -8.241562130657466e+208 -7.883168262016867e-32)	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
0	0	-	0	-	`(cos.f64 phi1)`
0	0	-	0	-	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
0	0	-	0	-	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
0	0	-	0	-	`(sin.f64 phi2)`
0	0	-	0	-	`phi1`
0	0	-	0	-	`(*.f64 (sin.f64 phi1) (sin.f64 phi2))`
0	0	-	0	-	`(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))`
0	0	-	0	-	`lambda1`
0	0	-	0	-	`(cos.f64 phi2)`
0	0	-	0	-	`(sin.f64 phi1)`
0	0	-	0	-	`R`
0	0	-	0	-	`(-.f64 lambda1 lambda2)`
0	0	-	0	-	`(*.f64 (cos.f64 phi1) (cos.f64 phi2))`
0	0	-	0	-	`phi2`
0	0	-	0	-	`lambda2`

Results

343.0ms	368×	1	valid
43.0ms	142×	0	valid
4.0ms	2×	2	valid

Compiler

Compiled 220 to 53 computations (75.9% saved)

Precisions

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

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

ival-sin: 82.0ms (31% of total)

ival-acos: 45.0ms (17% of total)

ival-mult: 27.0ms (10.2% of total)

backward-pass: 18.0ms (6.8% of total)

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

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

const: 1.0ms (0.4% of total)

eval0.0ms (0%)

Compiler: Compiled 24 to 17 computations (29.2% saved)

prune1.0ms (0%)

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	74.4%	(.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 24 to 17 computations (29.2% saved)

simplify19.0ms (0.1%)

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Program
✓	cost-diff	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	cost-diff	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
✓	cost-diff	(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	(.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)

Rules

124×	`fnmadd-define`
122×	`sum3-define`
96×	`fma-lowering-fma.f32`
96×	`fma-lowering-fma.f64`
94×	`fma-define`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	89
1	27	89
2	43	89
3	56	89
4	67	89
5	100	89
6	159	89
7	247	89
8	332	89
9	439	89
10	517	89
11	523	89
0	523	89

Stop Event

1×	iter limit
1×	saturated

Calls

Call 1

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

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

localize221.0ms (0.9%)

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.7%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.7%	(.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	92.8%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
✓	accuracy	78.8%	(cos.f64 (-.f64 lambda1 lambda2))

Results

160.0ms	184×	1	valid
36.0ms	71×	0	valid
2.0ms	1×	2	valid

Compiler

Compiled 98 to 18 computations (81.6% saved)

Precisions

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

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

ival-mult: 34.0ms (27.7% of total)

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

backward-pass: 9.0ms (7.3% of total)

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

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

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

const: 0.0ms (0% of total)

series30.0ms (0.1%)

Counts

5 → 204

Calls

Call 1

Inputs
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2)))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda1 lambda2))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (cos (- lambda1 lambda2))>

Outputs
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos phi2) (cos (- lambda1 lambda2)))>
#<alt (+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos phi1) (cos (- lambda1 lambda2)))>
#<alt (+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))>
#<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))))>
#<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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<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))))>
#<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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* phi1 (sin phi2))>
#<alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))>
#<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))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* phi2 (sin phi1))>
#<alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))>
#<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))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (cos (neg lambda2))>
#<alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))>
#<alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>

Calls

51 calls:

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

rewrite629.0ms (2.6%)

Algorithm

1×	batch-egg-rewrite

Rules

5302×	`-lowering-.f32`
5302×	`-lowering-.f64`
2912×	`/-lowering-/.f32`
2912×	`/-lowering-/.f64`
1906×	`+-lowering-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	58
1	72	58
2	597	58
0	8394	58

Stop Event

1×	iter limit
1×	node limit

Counts

5 → 157

Calls

Call 1

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

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

simplify267.0ms (1.1%)

Algorithm

1×	egg-herbie

Rules

3434×	`-lowering-.f32`
3434×	`-lowering-.f64`
1580×	`+-lowering-+.f64`
1580×	`+-lowering-+.f32`
1452×	`sum3-define`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	183	3081
1	611	3032
2	2189	3004
3	4006	3001
0	8109	3001

Stop Event

1×	iter limit
1×	node limit

Counts

204 → 204

Calls

Call 1

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

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

eval65.0ms (0.3%)

Compiler: Compiled 11928 to 1109 computations (90.7% saved)

prune74.0ms (0.3%)

Pruning

36 alts after pruning (36 fresh and 0 done)

	Pruned	Kept	Total
New	325	36	361
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	326	36	362

Accuracy

93.2%

Counts

362 → 36

Alt Table

Click to see full alt table

Status	Accuracy	Program
	74.1%	(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	74.2%	(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
▶	74.3%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	74.3%	(.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	74.1%	(.f64 (-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)
	74.2%	(.f64 (-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	74.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
	74.2%	(.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	74.2%	(.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
	50.6%	(.f64 (acos.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	74.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	56.8%	(.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
	56.8%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	74.4%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	92.8%	(.f64 (acos.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	92.8%	(.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 lambda1) (sin.f64 lambda2)))))) R)
▶	92.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
▶	44.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 lambda1 (.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64))))))))) R)
	44.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) R)
	47.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 (sin.f64 lambda1) (+.f64 (.f64 lambda2 (.f64 lambda2 #s(literal -1/6 binary64))) #s(literal 1 binary64))))))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))))))))) R)
	49.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))) R)
	74.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
	56.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
	74.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
▶	54.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
	30.9%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
	33.4%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
	33.3%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))) (.f64 (.f64 phi2 phi2) (.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2)))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	35.8%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	31.5%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	29.4%	(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	74.2%	(.f64 (acos.f64 (.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) R)
	38.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
▶	40.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)

Compiler

Compiled 2810 to 1642 computations (41.6% saved)

simplify222.0ms (0.9%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 lambda1 (*.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))))
✓	cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 lambda1 (.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64))))))))) R)
✓	cost-diff	128	(.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 lambda1 (*.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64)))
✓	cost-diff	6272	(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 lambda1 (.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64))))))
✓	cost-diff	0	(PI.f64)
✓	cost-diff	0	(/.f64 (PI.f64) #s(literal 2 binary64))
✓	cost-diff	0	(*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R)
✓	cost-diff	256	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓	cost-diff	0	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	cost-diff	0	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
✓	cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
✓	cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
✓	cost-diff	0	(cos.f64 phi1)
✓	cost-diff	0	(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
✓	cost-diff	0	(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
✓	cost-diff	0	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
✓	cost-diff	0	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	cost-diff	0	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
✓	cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (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)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)

Rules

3752×	`-lowering-.f32`
3752×	`-lowering-.f64`
1698×	`fma-lowering-fma.f32`
1698×	`fma-lowering-fma.f64`
1548×	`fma-define`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	63	640
1	151	624
2	450	617
3	1469	617
4	5071	611
0	8051	611

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))
(* (sin lambda1) (sin lambda2))
(sin lambda1)
lambda1
(sin lambda2)
lambda2
(* (cos lambda1) (cos lambda2))
(cos lambda1)
(cos lambda2)
R
(* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(cos phi1)
phi1
(cos (- lambda2 lambda1))
(- lambda2 lambda1)
lambda2
lambda1
R
(* (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2)))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi1) (* (cos phi2) (cos lambda2)))
(cos phi1)
(* (cos phi2) (cos lambda2))
(cos phi2)
(cos lambda2)
lambda2
R
(+ (* (/ (PI) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(* (/ (PI) 2) R)
(/ (PI) 2)
(PI)
2
R
(* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
0
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(cos phi2)
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1))))))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1))))))
(* (cos phi1) (cos phi2))
(cos phi1)
(cos phi2)
(+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))
(cos lambda2)
lambda2
(* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1))))
lambda1
(+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))
(* lambda1 (* -1/2 (cos lambda2)))
(* -1/2 (cos lambda2))
-1/2
(* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1))
(- 0 (sin lambda2))
0
(sin lambda2)
(+ (* lambda1 (* lambda1 1/6)) -1)
(* lambda1 (* lambda1 1/6))
(* lambda1 1/6)
1/6
-1
R

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

localize580.0ms (2.4%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 lambda1 (.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64))))))))) R)
✓	accuracy	99.7%	(*.f64 lambda1 #s(literal 1/6 binary64))
✓	accuracy	93.0%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 lambda1 (*.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64)))))))))
✓	accuracy	99.6%	(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
✓	accuracy	99.4%	(cos.f64 (-.f64 lambda1 lambda2))
✓	accuracy	93.4%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓	accuracy	53.1%	(PI.f64)
✓	accuracy	99.9%	(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
✓	accuracy	93.0%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
✓	accuracy	99.9%	(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
✓	accuracy	99.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
✓	accuracy	99.4%	(cos.f64 (-.f64 lambda2 lambda1))
✓	accuracy	86.9%	(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
✓	accuracy	99.9%	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
✓	accuracy	93.0%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))

Results

230.0ms	85×	1	valid
140.0ms	124×	0	invalid
45.0ms	41×	0	valid
33.0ms	6×	2	valid

Compiler

Compiled 695 to 64 computations (90.8% saved)

Precisions

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

ival-mult: 55.0ms (22.5% of total)

ival-cos: 51.0ms (20.8% of total)

ival-sin: 50.0ms (20.4% of total)

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

backward-pass: 19.0ms (7.8% of total)

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

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

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

...c/correct-round.rkt:119:19: 7.0ms (2.9% of total)

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

const: 1.0ms (0.4% of total)

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

series118.0ms (0.5%)

Counts

25 → 840

Calls

Call 1

Inputs
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (cos phi1)>
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2)))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2))))>
#<alt (+ (* (/ (PI) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))>
#<alt (* (/ (PI) 2) R)>
#<alt (/ (PI) 2)>
#<alt (PI)>
#<alt (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))>
#<alt (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1))>
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1))))))))>
#<alt (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (* (cos phi2) (cos lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))>
#<alt (* lambda1 1/6)>

Outputs
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (sin phi2)) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<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)))))>
#<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)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (sin phi1)) (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<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)))))>
#<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)))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<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))))>
#<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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<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))))>
#<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))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (* phi1 (sin phi2))>
#<alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))>
#<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))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* phi2 (sin phi1))>
#<alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))>
#<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))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))>
#<alt (* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))>
#<alt (* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))>
#<alt (* R (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* R (acos (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))>
#<alt (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))>
#<alt (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))>
#<alt (acos (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2))))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (- lambda2 lambda1))))>
#<alt (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))>
#<alt (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))>
#<alt (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))>
#<alt (acos (* (cos phi1) (cos (+ lambda2 (* -1 lambda1)))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (+ (cos (- lambda2 lambda1)) (* -1/2 (* (pow phi1 2) (cos (- lambda2 lambda1)))))>
#<alt (+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/24 (* (pow phi1 2) (cos (- lambda2 lambda1)))))))>
#<alt (+ (cos (- lambda2 lambda1)) (* (pow phi1 2) (+ (* -1/2 (cos (- lambda2 lambda1))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (cos (- lambda2 lambda1)))) (* 1/24 (cos (- lambda2 lambda1))))))))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (neg lambda1)))>
#<alt (+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* -1/2 (* lambda2 (* (cos phi1) (cos (neg lambda1))))))) (* (cos phi1) (cos (neg lambda1))))>
#<alt (+ (* lambda2 (+ (* -1 (* (cos phi1) (sin (neg lambda1)))) (* lambda2 (+ (* -1/2 (* (cos phi1) (cos (neg lambda1)))) (* 1/6 (* lambda2 (* (cos phi1) (sin (neg lambda1))))))))) (* (cos phi1) (cos (neg lambda1))))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (cos (neg (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos lambda2) (cos phi1))>
#<alt (+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (cos phi1)))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* lambda1 (* (cos phi1) (sin lambda2)))))) (* (cos phi1) (sin lambda2)))) (* (cos lambda2) (cos phi1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (- lambda2 lambda1)))>
#<alt (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))>
#<alt (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))>
#<alt (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))>
#<alt (* (cos phi1) (cos (+ lambda2 (* -1 lambda1))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (cos phi1)>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda2) (cos phi2)))))) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos lambda2) (cos phi1))>
#<alt (+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda2) (cos phi1)))))) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2))))))))>
#<alt (+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (+ 1 (* -1/2 (pow lambda1 2)))>
#<alt (+ 1 (+ (* -1 (* lambda1 (* lambda2 (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (pow lambda1 2))))>
#<alt (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* -1 (* lambda1 (- (* 1/6 (pow lambda1 2)) 1))) (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))>
#<alt (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ (* -1 (* lambda1 (- (* 1/6 (pow lambda1 2)) 1))) (* lambda2 (- (+ (* 1/6 (* lambda1 (* lambda2 (- (* 1/6 (pow lambda1 2)) 1)))) (* 1/4 (pow lambda1 2))) 1/2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))))))>
#<alt (* -1/6 (* (pow lambda1 3) (sin lambda2)))>
#<alt (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (* -1/6 (sin lambda2))))>
#<alt (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2)))))>
#<alt (* (pow lambda1 3) (+ (* -1/2 (/ (cos lambda2) lambda1)) (+ (* -1/6 (sin lambda2)) (+ (/ (cos lambda2) (pow lambda1 3)) (/ (sin lambda2) (pow lambda1 2))))))>
#<alt (* -1/6 (* (pow lambda1 3) (sin lambda2)))>
#<alt (* -1 (* (pow lambda1 3) (+ (* 1/6 (sin lambda2)) (* 1/2 (/ (cos lambda2) lambda1)))))>
#<alt (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/6 (sin lambda2)))))>
#<alt (* -1 (* (pow lambda1 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))) lambda1)) (* 1/6 (sin lambda2)))))>
#<alt (* -1 (* lambda2 (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (* lambda2 (+ (* -1 (- (* 1/6 (pow lambda1 2)) 1)) (* 1/6 (* (pow lambda2 2) (- (* 1/6 (pow lambda1 2)) 1)))))>
#<alt (* lambda2 (+ (* -1 (- (* 1/6 (pow lambda1 2)) 1)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (- (* 1/6 (pow lambda1 2)) 1))) (* 1/6 (- (* 1/6 (pow lambda1 2)) 1))))))>
#<alt (* lambda2 (+ (* -1 (- (* 1/6 (pow lambda1 2)) 1)) (* (pow lambda2 2) (+ (* 1/6 (- (* 1/6 (pow lambda1 2)) 1)) (* (pow lambda2 2) (+ (* -1/120 (- (* 1/6 (pow lambda1 2)) 1)) (* 1/5040 (* (pow lambda2 2) (- (* 1/6 (pow lambda1 2)) 1)))))))))>
#<alt (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))>
#<alt (sin lambda2)>
#<alt (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2))))>
#<alt (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2))))>
#<alt (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2))))>
#<alt (* -1/6 (* (pow lambda1 2) (sin lambda2)))>
#<alt (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2))))>
#<alt (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2))))>
#<alt (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2))))>
#<alt (* -1/6 (* (pow lambda1 2) (sin lambda2)))>
#<alt (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2))))>
#<alt (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2))))>
#<alt (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (/ (sin lambda2) (pow lambda1 2))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1 (* lambda1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1 (* lambda1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1 (* lambda1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1 (* lambda1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1 (* lambda1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1 (* lambda1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1 (* lambda1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1 (* lambda1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1)))) (* -1/2 (* (pow lambda1 2) (cos lambda2))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (* -1 (* (sin lambda2) (- (* 1/6 (pow lambda1 2)) 1))) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<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)))))>
#<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)))))))))>
#<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))))))))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))>
#<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)))))>
#<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)))))))))>
#<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))))))))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos lambda2) (* (cos phi1) (cos phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<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))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<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))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))>
#<alt (cos (neg lambda1))>
#<alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))>
#<alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))>
#<alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))>
#<alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))>
#<alt (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))>
#<alt (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (cos phi2)>
#<alt (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))>
#<alt (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))>
#<alt (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (cos (neg lambda2))>
#<alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))>
#<alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>
#<alt (* 1/6 lambda1)>

Calls

210 calls:

Time	Variable		Point	Expression
13.0ms	R	@	inf	(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))))) R)
6.0ms	lambda1	@	inf	(* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)
3.0ms	phi2	@	inf	(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
3.0ms	phi1	@	0	(+ (* (/ (PI) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
3.0ms	phi2	@	-inf	(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))))) R)

rewrite306.0ms (1.3%)

Algorithm

1×	batch-egg-rewrite

Rules

3686×	`-lowering-.f32`
3686×	`-lowering-.f64`
1518×	`fma-lowering-fma.f32`
1518×	`fma-lowering-fma.f64`
1454×	`+-lowering-+.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	63	292
1	372	285
2	3639	282
0	8114	282

Stop Event

1×	iter limit
1×	node limit

Counts

25 → 421

Calls

Call 1

Inputs
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(* (sin phi1) (sin phi2))
(* (acos (* (cos phi1) (cos (- lambda2 lambda1)))) R)
(acos (* (cos phi1) (cos (- lambda2 lambda1))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(cos phi1)
(* (acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2)))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos lambda2))))
(+ (* (/ (PI) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(* (/ (PI) 2) R)
(/ (PI) 2)
(PI)
(+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))
(* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1))
(* (acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1)))))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (+ (cos lambda2) (* lambda1 (+ (* lambda1 (* -1/2 (cos lambda2))) (* (- 0 (sin lambda2)) (+ (* lambda1 (* lambda1 1/6)) -1))))))))
(* (* (cos phi1) (cos phi2)) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(cos (- lambda2 lambda1))
(* (cos phi2) (cos lambda2))
(cos (- lambda1 lambda2))
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(* lambda1 1/6)

Outputs
(+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(+.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (/.f64 (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (+.f64 (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) R) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64))) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))) (neg.f64 (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(+.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (+.f64 (.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (.f64 (PI.f64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (+.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(pow.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))) #s(literal -2 binary64))
(/.f64 (.f64 (cos.f64 phi1) (+.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 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (cos.f64 phi1) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 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)) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (cos.f64 phi1)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64))
(cos.f64 phi1)
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi2) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(pow.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(+.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (/.f64 (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (+.f64 (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) R) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64))) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))) (neg.f64 (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 R (PI.f64))))
(/.f64 (*.f64 R (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 R (PI.f64))) #s(literal -2 binary64))
(/.f64 (*.f64 R #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) R) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) R) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 R (PI.f64))) #s(literal -1 binary64))
(*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R))
(*.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)))
(*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R)
(.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(log.f64 (+.f64 #s(literal 1 binary64) (expm1.f64 (PI.f64))))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(-.f64 (exp.f64 (log1p.f64 (PI.f64))) #s(literal 1 binary64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))
(expm1.f64 (log1p.f64 (PI.f64)))
(log1p.f64 (expm1.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (exp.f64 #s(literal 1 binary64))))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(.f64 (cbrt.f64 (PI.f64)) (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (pow.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (sqrt.f64 (PI.f64))) #s(literal 3 binary64)))
(.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/3 binary64)) (cbrt.f64 (PI.f64)))
(.f64 (pow.f64 (.f64 (PI.f64) (sqrt.f64 (PI.f64))) #s(literal 1/3 binary64)) (pow.f64 (*.f64 (PI.f64) (sqrt.f64 (PI.f64))) #s(literal 1/3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (sqrt.f64 (PI.f64))) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (cbrt.f64 (PI.f64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (sqrt.f64 (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (sqrt.f64 (PI.f64))) #s(literal 2 binary64)))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))
(+.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (cos.f64 lambda2))
(+.f64 (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1))) (+.f64 (.f64 lambda1 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))) (cos.f64 lambda2)))
(+.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)))) (.f64 lambda1 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))) (/.f64 (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 2 binary64)) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))
(fma.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))) (cos.f64 lambda2))
(fma.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))) lambda1 (cos.f64 lambda2))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (cos.f64 lambda2)))) (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 2 binary64))) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))
(/.f64 (-.f64 (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (cos.f64 lambda2)))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (cos.f64 lambda2)))) (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (-.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) (cos.f64 lambda2))))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (pow.f64 (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))
(+.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1))))
(+.f64 (.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)) #s(literal 0 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))
(+.f64 (.f64 #s(literal 0 binary64) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))
(-.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1))) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))
(-.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1))) (.f64 (sin.f64 lambda2) #s(literal -1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))
(fma.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))
(neg.f64 (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))))
(neg.f64 (.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)) (sin.f64 lambda2)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (+.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) #s(literal 1/216 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) #s(literal -1/6 binary64))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (+.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) #s(literal 1/216 binary64)))) (.f64 (sin.f64 lambda2) (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) #s(literal -1/6 binary64))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) #s(literal -1 binary64))) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64))))
(/.f64 (.f64 (+.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) #s(literal 1/216 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) #s(literal -1/6 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))))
(/.f64 (.f64 (+.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) #s(literal 1/216 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))))) (.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) #s(literal -1/6 binary64)))) (sin.f64 lambda2)))
(/.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))))
(/.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))))) (.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1))) #s(literal 3 binary64)) (.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 3 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)))) (-.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1))) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)))) (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) #s(literal 1/216 binary64)))) (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) #s(literal -1 binary64))) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (sin.f64 lambda2))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))) (sin.f64 lambda2))
(/.f64 (.f64 (+.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda1 (.f64 lambda1 lambda1))) #s(literal 1/216 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64)))))
(/.f64 (.f64 (+.f64 (.f64 (.f64 (.f64 lambda1 lambda1) (.f64 lambda1 lambda1)) #s(literal 1/36 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)))
(.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))
(.f64 (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda1 lambda1)) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) lambda1)) (.f64 (sin.f64 lambda2) (+.f64 (.f64 #s(literal 1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))))))))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (+.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 #s(literal 2 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 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))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (*.f64 (cos.f64 phi1) (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2)))) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.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 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (-.f64 phi2 lambda1) lambda2))) (cos.f64 phi1)) #s(literal 2 binary64))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(.f64 (cos.f64 (-.f64 lambda2 lambda1)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))))
(/.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 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.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 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (neg.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)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))) (neg.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (cos.f64 (+.f64 lambda1 lambda2)))
(pow.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))) #s(literal -1 binary64))
(.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 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 lambda2 phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 1/2 binary64))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))))
(/.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 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.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 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (sin.f64 lambda2) (.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (neg.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)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))) (neg.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (cos.f64 (+.f64 lambda1 lambda2)))
(pow.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))))) #s(literal -1 binary64))
(.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 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))))
(.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(+.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 0 binary64))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (+.f64 #s(literal 0 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(*.f64 lambda1 #s(literal 1/6 binary64))
(*.f64 #s(literal 1/6 binary64) lambda1)

simplify365.0ms (1.5%)

Algorithm

1×	egg-herbie

Rules

5462×	`-lowering-.f32`
5462×	`-lowering-.f64`
2262×	`+-lowering-+.f64`
2262×	`+-lowering-+.f32`
1778×	`fma-define`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	549	15213
1	1894	14331
2	7242	14323
0	8544	14323

Stop Event

1×	iter limit
1×	node limit

Counts

840 → 840

Calls

Call 1

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

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

eval179.0ms (0.8%)

Compiler: Compiled 43178 to 3020 computations (93% saved)

prune194.0ms (0.8%)

Pruning

74 alts after pruning (72 fresh and 2 done)

	Pruned	Kept	Total
New	1353	56	1409
Fresh	15	16	31
Picked	3	2	5
Done	0	0	0
Total	1371	74	1445

Accuracy

93.6%

Counts

1445 → 74

Alt Table

Click to see full alt table

Status	Accuracy	Program
	74.1%	(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
	74.1%	(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
	38.6%	(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64))) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
	25.2%	(/.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	74.2%	(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
	38.5%	(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (/.f64 (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
▶	74.3%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	74.2%	(+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 R (PI.f64)))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
▶	73.2%	(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	73.9%	(+.f64 (.f64 (/.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	73.9%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) R))
	73.7%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) R))
	74.3%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R))
	92.1%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) R))
	92.3%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) R))
	47.5%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))))))) R))
	54.1%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
	38.2%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	42.5%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	39.6%	(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	73.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	53.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))) R)
	39.5%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	40.2%	(.f64 (/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	74.2%	(.f64 (/.f64 (+.f64 (.f64 (PI.f64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	74.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	54.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))) R)
	40.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	74.2%	(.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	50.6%	(.f64 (acos.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	29.5%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
	74.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	74.4%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
▶	92.8%	(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	74.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))) R)
✓	92.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	47.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 (sin.f64 lambda1) (+.f64 (.f64 lambda2 (.f64 lambda2 #s(literal -1/6 binary64))) #s(literal 1 binary64))))))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))))))))) R)
	49.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))) R)
	74.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
	11.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 lambda1 (.f64 lambda1 (.f64 lambda1 (.f64 (sin.f64 lambda2) #s(literal -1/6 binary64)))))))) R)
	56.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
	49.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	27.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/24 binary64))))))))) R)
	48.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
✓	54.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
	34.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
	29.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
▶	28.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
	41.8%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (sin.f64 phi1)))) R)
	33.4%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
	35.8%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	31.5%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	23.2%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
	29.4%	(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	22.6%	(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
	13.1%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	13.0%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	49.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	38.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	29.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
	48.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	48.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	39.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (cos.f64 (+.f64 lambda1 lambda2))))) R)
	48.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	25.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))) R)
	21.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2))))))) R)
	21.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)))))))) R)
	24.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
	25.9%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
	30.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
	31.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
▶	21.1%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)

Compiler

Compiled 4767 to 3060 computations (35.8% saved)

simplify159.0ms (0.7%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64))
✓	cost-diff	0	(*.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R)
✓	cost-diff	256	(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓	cost-diff	12864	(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
✓	cost-diff	0	(PI.f64)
✓	cost-diff	0	(/.f64 (PI.f64) #s(literal 2 binary64))
✓	cost-diff	0	(*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))
✓	cost-diff	128	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
✓	cost-diff	0	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))
✓	cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
✓	cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
✓	cost-diff	128	(.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))
✓	cost-diff	0	(-.f64 lambda1 lambda2)
✓	cost-diff	0	(cos.f64 (-.f64 lambda1 lambda2))
✓	cost-diff	0	(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
✓	cost-diff	0	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
✓	cost-diff	0	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
✓	cost-diff	0	(acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
✓	cost-diff	0	(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
✓	cost-diff	13056	(+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))

Rules

2398×	`fma-define`
2150×	`fnmadd-define`
2016×	`fma-lowering-fma.f32`
2016×	`fma-lowering-fma.f64`
1538×	`-lowering-.f32`

Iterations

Useful iterations: 7 (0.0ms)

Iter	Nodes	Cost
0	58	532
1	127	527
2	291	512
3	632	509
4	1047	509
5	1457	509
6	2089	509
7	3154	507
8	5089	507
9	7033	507
0	8140	507

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* (acos (+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2)))))) R)
(acos (+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2))))))
(+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2)))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(cos phi1)
(* (cos phi2) (* (sin lambda1) (sin lambda2)))
(cos phi2)
(* (sin lambda1) (sin lambda2))
(sin lambda1)
lambda1
(sin lambda2)
lambda2
(* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2))))
(* (cos phi1) (* (cos lambda1) (cos lambda2)))
(* (cos lambda1) (cos lambda2))
(cos lambda1)
(cos lambda2)
R
(* (acos (cos (- lambda1 lambda2))) R)
(acos (cos (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
R
(* (acos (+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2)))))
(+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* 1 (* (cos phi2) (cos lambda2)))
1
(* (cos phi2) (cos lambda2))
(cos phi2)
(cos lambda2)
lambda2
R
(- (* R (/ (PI) 2)) (* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1)))))) R))
(* R (/ (PI) 2))
R
(/ (PI) 2)
(PI)
2
(* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1)))))) R)
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1))))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1)))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1))))
(cos phi2)
(* (cos phi1) (cos (- lambda2 lambda1)))
(cos phi1)
(cos (- lambda2 lambda1))
(- lambda2 lambda1)
lambda2
lambda1
(+ (* (/ (pow (sqrt (PI)) 2) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(* (/ (pow (sqrt (PI)) 2) 2) R)
(/ (pow (sqrt (PI)) 2) 2)
(pow (sqrt (PI)) 2)
(sqrt (PI))
(PI)
2
R
(* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R)
(- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
0
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(cos phi1)
(* (cos phi2) (cos (- lambda1 lambda2)))
(cos phi2)
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2

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

localize999.0ms (4.2%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	98.7%	(sqrt.f64 (PI.f64))
✓	accuracy	93.6%	(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
✓	accuracy	85.6%	(PI.f64)
✓	accuracy	79.8%	(cos.f64 (-.f64 lambda1 lambda2))
✓	accuracy	99.5%	(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
✓	accuracy	93.6%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
✓	accuracy	85.6%	(PI.f64)
✓	accuracy	79.8%	(cos.f64 (-.f64 lambda2 lambda1))
✓	accuracy	99.8%	(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
✓	accuracy	99.7%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
✓	accuracy	82.9%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
✓	accuracy	100.0%	(-.f64 lambda1 lambda2)
✓	accuracy	99.7%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
✓	accuracy	79.8%	(cos.f64 (-.f64 lambda1 lambda2))
✓	accuracy	78.0%	(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
✓	accuracy	99.8%	(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
✓	accuracy	99.7%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.7%	(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
✓	accuracy	93.6%	(acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))

Results

707.0ms	190×	1	valid
67.0ms	14×	2	valid
45.0ms	19×	1	invalid
19.0ms	14×	0	valid
17.0ms	17×	0	invalid
8.0ms	2×	2	invalid

Compiler

Compiled 580 to 59 computations (89.8% saved)

Precisions

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

ival-mult: 129.0ms (26.6% of total)

ival-cos: 104.0ms (21.5% of total)

ival-sin: 74.0ms (15.3% of total)

backward-pass: 47.0ms (9.7% of total)

ival-sub: 39.0ms (8% of total)

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

ival-asin: 24.0ms (5% of total)

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

ival-div: 8.0ms (1.7% of total)

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

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

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

const: 1.0ms (0.2% of total)

series56.0ms (0.2%)

Counts

26 → 768

Calls

Call 1

Inputs
#<alt (+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2)))))>
#<alt (* (acos (+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2)))))) R)>
#<alt (acos (+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2))))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (* (acos (cos (- lambda1 lambda2))) R)>
#<alt (acos (cos (- lambda1 lambda2)))>
#<alt (cos (- lambda1 lambda2))>
#<alt (- lambda1 lambda2)>
#<alt (* 1 (* (cos phi2) (cos lambda2)))>
#<alt (* (acos (+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2))))) R)>
#<alt (acos (+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2)))))>
#<alt (+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2))))>
#<alt (- (* R (/ (PI) 2)) (* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1)))))) R))>
#<alt (* R (/ (PI) 2))>
#<alt (/ (PI) 2)>
#<alt (PI)>
#<alt (pow (sqrt (PI)) 2)>
#<alt (+ (* (/ (pow (sqrt (PI)) 2) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))>
#<alt (* (/ (pow (sqrt (PI)) 2) 2) R)>
#<alt (/ (pow (sqrt (PI)) 2) 2)>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2))))>
#<alt (* (cos phi2) (cos lambda2))>
#<alt (cos (- lambda2 lambda1))>
#<alt (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1))))))>
#<alt (sqrt (PI))>

Outputs
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<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))))>
#<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))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<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))))>
#<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))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))>
#<alt (* (cos phi2) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* phi1 (sin phi2)) (* (cos phi2) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos phi1) (* (sin lambda1) (sin lambda2)))>
#<alt (+ (* phi2 (sin phi1)) (* (cos phi1) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (* (sin lambda1) (sin lambda2))))))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda1 (+ (* (cos phi1) (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (pow lambda1 2) (* (cos phi1) (* (cos phi2) (sin lambda2))))))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi1) (* (cos phi2) (sin lambda1))))))))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))>
#<alt (* -1 (* R lambda2))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (* R lambda1)>
#<alt (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))>
#<alt (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))>
#<alt (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))>
#<alt (* R lambda1)>
#<alt (* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 R) (/ (* R lambda2) lambda1))))>
#<alt (* R lambda1)>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (+ (* -1 (* R lambda2)) (* R lambda1))>
#<alt (* -1 (* R lambda2))>
#<alt (* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))>
#<alt (* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))>
#<alt (* lambda2 (+ (* -1 R) (/ (* R lambda1) lambda2)))>
#<alt (* -1 (* R lambda2))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* R (- lambda1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (cos (neg lambda2))>
#<alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))>
#<alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos (neg (+ lambda2 (* -1 lambda1))))>
#<alt (cos lambda1)>
#<alt (+ (cos lambda1) (* lambda2 (sin lambda1)))>
#<alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))>
#<alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (- lambda1 lambda2))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (cos (+ lambda1 (* -1 lambda2)))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))>
#<alt (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))>
#<alt (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (cos phi2)>
#<alt (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))>
#<alt (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))>
#<alt (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2))))) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2))))))) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* phi2 (sin phi1)))>
#<alt (+ (cos lambda2) (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (cos lambda2))))))>
#<alt (+ (cos lambda2) (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (cos lambda2)) (* -1/6 (* phi2 (sin phi1))))))))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (cos phi2) (* (sin phi1) (sin phi2)))>
#<alt (+ (cos phi2) (+ (* -1/2 (* (pow lambda2 2) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (+ (cos phi2) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2)))))))>
#<alt (+ (cos phi2) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2))))))))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (- (* -1/2 (PI)) (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))))>
#<alt (* -1 (* R (- (* -1/2 (PI)) (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))))>
#<alt (* -1 (* R (- (* -1/2 (PI)) (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))))>
#<alt (* -1 (* R (- (* -1/2 (PI)) (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* R (+ (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/2 (PI))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (* -1 (* R (+ (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))) (* -1/2 (PI)))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (+ (* -1 (* R (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))) (* 1/2 (* R (PI))))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* phi1 (sin phi2))>
#<alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))>
#<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))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* phi2 (sin phi1))>
#<alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))>
#<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))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (cos lambda1) (* (cos lambda2) (cos phi1)))>
#<alt (+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* (cos lambda1) (* (cos lambda2) (cos phi1))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (cos phi1))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi1)))))))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (cos phi2)))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))>
#<alt (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (cos phi2)))))))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda2) (* (cos phi1) (cos phi2)))>
#<alt (+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))))))>
#<alt (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda2) (* (cos phi1) (cos phi2)))))))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos phi1) (cos phi2)))>
#<alt (+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos lambda1) (* (cos phi1) (cos phi2))))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))))))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 1/24 (* (cos lambda1) (* (cos phi1) (cos phi2)))))))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2))))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* -1/2 (* (pow phi2 2) (cos lambda2))))>
#<alt (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* 1/24 (* (pow phi2 2) (cos lambda2))))))>
#<alt (+ (cos lambda2) (* (pow phi2 2) (+ (* -1/2 (cos lambda2)) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (cos lambda2))) (* 1/24 (cos lambda2)))))))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (cos phi2)>
#<alt (+ (cos phi2) (* -1/2 (* (pow lambda2 2) (cos phi2))))>
#<alt (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* 1/24 (* (pow lambda2 2) (cos phi2))))))>
#<alt (+ (cos phi2) (* (pow lambda2 2) (+ (* -1/2 (cos phi2)) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (cos phi2))) (* 1/24 (cos phi2)))))))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (* (cos lambda2) (cos phi2))>
#<alt (cos (neg lambda1))>
#<alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))>
#<alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))>
#<alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos (neg (+ lambda1 (* -1 lambda2))))>
#<alt (cos lambda2)>
#<alt (+ (cos lambda2) (* lambda1 (sin lambda2)))>
#<alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))>
#<alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (- lambda2 lambda1))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (cos (+ lambda2 (* -1 lambda1)))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda1 (* -1 lambda2)))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (- lambda2 lambda1)))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda2 (* -1 lambda1))))) (* (sin phi1) (sin phi2))))>

Calls

192 calls:

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

rewrite386.0ms (1.6%)

Algorithm

1×	batch-egg-rewrite

Rules

3002×	`-lowering-.f32`
3002×	`-lowering-.f64`
2780×	`fma-lowering-fma.f32`
2780×	`fma-lowering-fma.f64`
1688×	`fma-define`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	58	281
1	333	216
2	3024	216
0	8163	216

Stop Event

1×	iter limit
1×	node limit

Counts

26 → 773

Calls

Call 1

Inputs
(+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2)))))
(* (acos (+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2)))))) R)
(acos (+ (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2))))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(* (acos (cos (- lambda1 lambda2))) R)
(acos (cos (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(- lambda1 lambda2)
(* 1 (* (cos phi2) (cos lambda2)))
(* (acos (+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2))))) R)
(acos (+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2)))))
(+ (* (sin phi1) (sin phi2)) (* 1 (* (cos phi2) (cos lambda2))))
(- (* R (/ (PI) 2)) (* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1)))))) R))
(* R (/ (PI) 2))
(/ (PI) 2)
(PI)
(pow (sqrt (PI)) 2)
(+ (* (/ (pow (sqrt (PI)) 2) 2) R) (* (- 0 (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))) R))
(* (/ (pow (sqrt (PI)) 2) 2) R)
(/ (pow (sqrt (PI)) 2) 2)
(* (sin phi1) (sin phi2))
(* (cos phi2) (* (cos phi1) (* (cos lambda1) (cos lambda2))))
(* (cos phi2) (cos lambda2))
(cos (- lambda2 lambda1))
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (cos (- lambda2 lambda1))))))
(sqrt (PI))

Outputs
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(-.f64 (/.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))))
(-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(fma.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))
(fma.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 lambda1))) (cos.f64 lambda2) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (sin.f64 lambda2) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))) (-.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))) (-.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(.f64 (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))))
(.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(.f64 (-.f64 (pow.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))))
(+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) R) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 #s(literal -1 binary64) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))) (neg.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))) (neg.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (+.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 2 binary64)) (.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 2 binary64))) (-.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (+.f64 (.f64 (PI.f64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))))) (.f64 #s(literal 2 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (.f64 (PI.f64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))))) (.f64 #s(literal -2 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))) (.f64 #s(literal -2 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (+.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))
(+.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (/.f64 (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(pow.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 (.f64 R lambda1) (.f64 R (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 R) (.f64 (-.f64 #s(literal 0 binary64) lambda2) R))
(fma.f64 lambda1 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R))
(fma.f64 R lambda1 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (.f64 R (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 R (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) R) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) R) (+.f64 lambda1 lambda2))
(*.f64 R (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) R)
(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 lambda2 (-.f64 #s(literal 0 binary64) lambda1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(+.f64 (-.f64 #s(literal 0 binary64) lambda1) lambda2)
(fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 (PI.f64) #s(literal 2 binary64))))
(fabs.f64 (neg.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 lambda1 lambda2)
(-.f64 lambda2 lambda1)
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1 binary64) lambda1 lambda2)
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1)))) (neg.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 lambda1 lambda1)))) (+.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 0 binary64) lambda1)) (.f64 lambda2 (-.f64 #s(literal 0 binary64) lambda1)))))
(/.f64 (+.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (.f64 (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 0 binary64) lambda1))) (-.f64 lambda2 (-.f64 #s(literal 0 binary64) lambda1)))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 0 binary64) lambda2))) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(pow.f64 (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1)))) #s(literal -1 binary64))
(.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))
(sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)))))
(fma.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 lambda2 (-.f64 #s(literal 0 binary64) lambda1))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(+.f64 (-.f64 #s(literal 0 binary64) lambda1) lambda2)
(fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 (PI.f64) #s(literal 2 binary64))))
(fabs.f64 (neg.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 (PI.f64) #s(literal 2 binary64)))))
(-.f64 lambda1 lambda2)
(-.f64 lambda2 lambda1)
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))
(-.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (sqrt.f64 (PI.f64)) (*.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (*.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1 binary64) lambda1 lambda2)
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1)))) (neg.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 #s(literal -1 binary64) (.f64 lambda1 (.f64 lambda1 lambda1)))) (+.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 0 binary64) lambda1)) (.f64 lambda2 (-.f64 #s(literal 0 binary64) lambda1)))))
(/.f64 (+.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 #s(literal -1 binary64) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (.f64 (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 0 binary64) lambda1))) (-.f64 lambda2 (-.f64 #s(literal 0 binary64) lambda1)))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 0 binary64) lambda2))) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))
(pow.f64 (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1)))) #s(literal -1 binary64))
(.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 lambda2 phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 1/2 binary64))
(.f64 (.f64 #s(literal 1 binary64) (cos.f64 lambda2)) (cos.f64 phi2))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) #s(literal 1 binary64)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(fma.f64 (.f64 #s(literal 1 binary64) (cos.f64 lambda2)) (cos.f64 phi2) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (sin.f64 phi2) (.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(/.f64 (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))))) #s(literal 4 binary64))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(pow.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) R) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 #s(literal -1 binary64) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))) (neg.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))) (neg.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (+.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 2 binary64)) (.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 2 binary64))) (-.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 R (PI.f64))))
(/.f64 (*.f64 R (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 R (PI.f64))) #s(literal -2 binary64))
(/.f64 (*.f64 R #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) R) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) R) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 R (PI.f64))) #s(literal -1 binary64))
(*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R))
(*.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)))
(*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R)
(.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(log.f64 (+.f64 #s(literal 1 binary64) (expm1.f64 (PI.f64))))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (PI.f64))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (.f64 (log.f64 (exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(exp.f64 (.f64 (.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64))))
(exp.f64 (+.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) (.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64))))
(exp.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)) (*.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64))))
(exp.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64))))
(-.f64 (exp.f64 (log1p.f64 (PI.f64))) #s(literal 1 binary64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))
(expm1.f64 (log1p.f64 (PI.f64)))
(log1p.f64 (expm1.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (exp.f64 #s(literal 1 binary64)) (log.f64 (PI.f64)))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (exp.f64 #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(.f64 (exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 4 binary64)) #s(literal 1/2 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/2 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(log.f64 (+.f64 #s(literal 1 binary64) (expm1.f64 (PI.f64))))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (PI.f64))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (.f64 (log.f64 (exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(exp.f64 (.f64 (.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64))))
(exp.f64 (+.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) (.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64))))
(exp.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)) (*.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64))))
(exp.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)) (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64))))
(-.f64 (exp.f64 (log1p.f64 (PI.f64))) #s(literal 1 binary64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))
(expm1.f64 (log1p.f64 (PI.f64)))
(log1p.f64 (expm1.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (exp.f64 #s(literal 1 binary64)) (log.f64 (PI.f64)))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (exp.f64 #s(literal 1 binary64))))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 4/3 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(.f64 (exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 4 binary64)) #s(literal 1/2 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/2 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) R) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(fma.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(fma.f64 #s(literal -1 binary64) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))) (neg.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))) (neg.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (+.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 2 binary64)) (.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) #s(literal 2 binary64))) (-.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))) (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (+.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64)) (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (-.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 R (PI.f64)) (*.f64 R (PI.f64))) #s(literal 4 binary64)))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 R R) R)) #s(literal 8 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 R (PI.f64))))
(/.f64 (*.f64 R (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 R (PI.f64))) #s(literal -2 binary64))
(/.f64 (*.f64 R #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) R) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) R) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 R (PI.f64))) #s(literal -1 binary64))
(*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R))
(*.f64 (PI.f64) (/.f64 R #s(literal 2 binary64)))
(*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R)
(.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64))
(-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(.f64 (cos.f64 phi1) (.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))) (cos.f64 lambda2))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))
(.f64 (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 lambda2 phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi2) (cos.f64 lambda2))
(.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) #s(literal 1 binary64)))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) #s(literal 1/2 binary64))
(.f64 (.f64 #s(literal 1 binary64) (cos.f64 lambda2)) (cos.f64 phi2))
(+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2)))))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)) (sin.f64 lambda2)))
(-.f64 (.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(-.f64 (.f64 #s(literal 0 binary64) (cos.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))) (.f64 #s(literal 1 binary64) (sin.f64 (neg.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))
(sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (-.f64 #s(literal 0 binary64) lambda2)))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1)))))
(fma.f64 #s(literal 0 binary64) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(/.f64 (+.f64 (.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 lambda2)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 0 binary64))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 #s(literal 0 binary64) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (sqrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(fabs.f64 (sqrt.f64 (PI.f64)))
(sqrt.f64 (PI.f64))
(pow.f64 (PI.f64) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3/2 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/6 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64)))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal 1 binary64)))

simplify436.0ms (1.8%)

Algorithm

1×	egg-herbie

Rules

6156×	`-lowering-.f32`
6156×	`-lowering-.f64`
1752×	`+-lowering-+.f64`
1752×	`+-lowering-+.f32`
1640×	`fma-define`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	474	12442
1	1681	12037
2	6141	12009
0	8348	12009

Stop Event

1×	iter limit
1×	node limit

Counts

768 → 768

Calls

Call 1

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

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

eval294.0ms (1.2%)

Compiler: Compiled 60711 to 3912 computations (93.6% saved)

prune374.0ms (1.6%)

Pruning

108 alts after pruning (105 fresh and 3 done)

	Pruned	Kept	Total
New	1755	52	1807
Fresh	14	53	67
Picked	4	1	5
Done	0	2	2
Total	1773	108	1881

Accuracy

97.0%

Counts

1881 → 108

Alt Table

Click to see full alt table

Status	Accuracy	Program
	74.1%	(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
	74.1%	(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
	38.6%	(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
	25.2%	(/.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))))
	74.2%	(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
	38.5%	(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
	74.2%	(-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 R (PI.f64)))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	73.2%	(-.f64 (.f64 R (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	73.9%	(-.f64 (.f64 R (/.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	73.7%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R))
	74.3%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
▶	92.3%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))
	47.5%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2))))))) R))
	47.6%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (.f64 lambda2 #s(literal -1/2 binary64)))))))))) R))
	54.1%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))))) R))
	55.9%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))) R))
	42.5%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	38.8%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	91.0%	(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))) R))
	91.0%	(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) R))
	53.3%	(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
	92.1%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) R))
	38.2%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	39.6%	(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	74.2%	(.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) R)
	74.0%	(.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (PI.f64) #s(literal 2 binary64))) R)
	73.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	53.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))) R)
▶	27.8%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
	39.5%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	40.2%	(.f64 (/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	6.2%	(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
	74.2%	(.f64 (/.f64 (+.f64 (.f64 (PI.f64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	6.2%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
	9.1%	(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
	74.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	54.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))) R)
	28.6%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
	40.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	9.8%	(*.f64 (-.f64 lambda2 lambda1) R)
	3.5%	(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
	74.2%	(.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	6.2%	(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
	19.7%	(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
	21.3%	(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	28.6%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
	26.4%	(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	50.6%	(.f64 (acos.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
▶	29.5%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
	74.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	92.2%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	74.4%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	11.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))) R)
	74.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
▶	56.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
	74.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))) R)
✓	92.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	47.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 (sin.f64 lambda1) (+.f64 (.f64 lambda2 (.f64 lambda2 #s(literal -1/6 binary64))) #s(literal 1 binary64))))))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))))))))) R)
	49.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))) R)
	74.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
	11.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 lambda1 (.f64 lambda1 (.f64 lambda1 (.f64 (sin.f64 lambda2) #s(literal -1/6 binary64)))))))) R)
	49.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	28.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
	48.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
✓	54.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
	34.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
	29.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
	17.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi2))) R)
	14.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 lambda2))) R)
	26.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	11.2%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) R)
	41.8%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (sin.f64 phi1)))) R)
	33.4%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
	35.8%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	31.5%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	23.2%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
	29.4%	(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	9.5%	(.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))) R)
	13.1%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	13.0%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	49.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	38.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	29.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
	48.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	48.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	39.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (cos.f64 (+.f64 lambda1 lambda2))))) R)
	48.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	25.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))) R)
	21.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2))))))) R)
	21.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)))))))) R)
	24.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
	25.9%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
	30.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
	31.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
	15.4%	(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
	7.9%	(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
	11.2%	(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
	7.3%	(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
	9.8%	(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
✓	21.1%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
	9.1%	(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
	17.1%	(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
	17.7%	(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
	14.5%	(*.f64 (acos.f64 (cos.f64 lambda2)) R)
	14.4%	(*.f64 (acos.f64 (cos.f64 lambda1)) R)
▶	3.6%	(*.f64 lambda1 R)

Compiler

Compiled 6457 to 4117 computations (36.2% saved)

simplify175.0ms (0.7%)

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	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 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
✓	cost-diff	19328	(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
✓	cost-diff	0	(*.f64 (sin.f64 phi2) (sin.f64 phi1))
✓	cost-diff	0	(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
✓	cost-diff	0	(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
✓	cost-diff	0	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
✓	cost-diff	0	(/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))))
✓	cost-diff	0	(acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))))))
✓	cost-diff	0	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
✓	cost-diff	128	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))
✓	cost-diff	0	(*.f64 lambda1 R)
✓	cost-diff	0	(PI.f64)
✓	cost-diff	0	(/.f64 (PI.f64) #s(literal 2 binary64))
✓	cost-diff	0	(*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))
✓	cost-diff	128	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))

Rules

2088×	`sum5-define`
1652×	`fma-define`
1644×	`sum4-define`
1634×	`fnmadd-define`
1458×	`-lowering-.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	54	472
1	121	463
2	268	463
3	550	463
4	1084	463
5	2055	463
6	4394	463
7	7624	463
0	8110	463

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(- (* R (/ (PI) 2)) (* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) R))
(* R (/ (PI) 2))
R
(/ (PI) 2)
(PI)
2
(* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) R)
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))
(cos phi2)
(* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))
(cos phi1)
(+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))
(* (sin lambda1) (sin lambda2))
(sin lambda1)
lambda1
(sin lambda2)
lambda2
(* (cos lambda1) (cos lambda2))
(cos lambda1)
(cos lambda2)
(* lambda1 R)
lambda1
R
(* (acos (/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1))))))) R)
(acos (/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))))
(/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1))))))
1
(/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))
2
(+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1))))
(cos (+ phi1 (- lambda2 lambda1)))
(+ phi1 (- lambda2 lambda1))
phi1
(- lambda2 lambda1)
lambda2
lambda1
(cos (- phi1 (- lambda2 lambda1)))
(- phi1 (- lambda2 lambda1))
R
(* (acos (+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1))))) R)
(acos (+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1)))))
(+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1))))
(* (sin phi2) (sin phi1))
(sin phi2)
phi2
(sin phi1)
phi1
(* (cos lambda1) (* (cos phi2) (cos phi1)))
(cos lambda1)
lambda1
(* (cos phi2) (cos phi1))
(cos phi2)
(cos phi1)
R
(* (+ (* (sqrt (PI)) (/ (sqrt (PI)) 2)) (neg (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2)))))) R)
(+ (* (sqrt (PI)) (/ (sqrt (PI)) 2)) (neg (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2))))))
(sqrt (PI))
(PI)
(/ (sqrt (PI)) 2)
2
(neg (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2)))))
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2))))
(+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2)))
(* (sin phi1) (sin phi2))
(sin phi1)
phi1
(sin phi2)
phi2
(* (cos phi2) (cos lambda2))
(cos phi2)
(cos lambda2)
lambda2
R

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

localize1.4s (6%)

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.4%	(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
✓	accuracy	98.9%	(sqrt.f64 (PI.f64))
✓	accuracy	98.9%	(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
✓	accuracy	69.3%	(PI.f64)
✓	accuracy	99.8%	(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
✓	accuracy	99.8%	(*.f64 (sin.f64 phi2) (sin.f64 phi1))
✓	accuracy	99.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
✓	accuracy	95.7%	(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
✓	accuracy	99.7%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))
✓	accuracy	93.1%	(acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))))))
✓	accuracy	65.0%	(cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))
✓	accuracy	64.8%	(cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1)))
✓	accuracy	100.0%	(*.f64 lambda1 R)
✓	accuracy	99.7%	(.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R)
✓	accuracy	99.5%	(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
✓	accuracy	99.0%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))
✓	accuracy	69.3%	(PI.f64)

Results

629.0ms	43×	5	exit
551.0ms	166×	1	valid
30.0ms	9×	2	invalid
23.0ms	10×	1	invalid
16.0ms	4×	2	valid
15.0ms	17×	0	invalid
12.0ms	2×	3	invalid
5.0ms	5×	0	valid

Compiler

Compiled 504 to 54 computations (89.3% saved)

Precisions

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

ival-cos: 276.0ms (34.6% of total)

ival-sin: 225.0ms (28.2% of total)

backward-pass: 81.0ms (10.1% of total)

ival-mult: 77.0ms (9.6% of total)

ival-acos: 31.0ms (3.9% of total)

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

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

ival-div: 21.0ms (2.6% of total)

compiled-spec: 15.0ms (1.9% of total)

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

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

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

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

const: 1.0ms (0.1% of total)

series83.0ms (0.3%)

Counts

21 → 696

Calls

Call 1

Inputs
#<alt (- (* R (/ (PI) 2)) (* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) R))>
#<alt (* R (/ (PI) 2))>
#<alt (/ (PI) 2)>
#<alt (PI)>
#<alt (* lambda1 R)>
#<alt (/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1))))))>
#<alt (* (acos (/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1))))))) R)>
#<alt (acos (/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))))>
#<alt (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))>
#<alt (* (acos (+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1))))) R)>
#<alt (acos (+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1)))))>
#<alt (+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1))))>
#<alt (* (sin phi2) (sin phi1))>
#<alt (+ (* (sqrt (PI)) (/ (sqrt (PI)) 2)) (neg (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2))))))>
#<alt (* (+ (* (sqrt (PI)) (/ (sqrt (PI)) 2)) (neg (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2)))))) R)>
#<alt (sqrt (PI))>
#<alt (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))))>
#<alt (* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) R)>
#<alt (cos (- phi1 (- lambda2 lambda1)))>
#<alt (cos (+ phi1 (- lambda2 lambda1)))>
#<alt (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2))))>

Outputs
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* -1 (* R (- (* -1/2 (PI)) (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))))>
#<alt (* -1 (* R (- (* -1/2 (PI)) (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))))>
#<alt (* -1 (* R (- (* -1/2 (PI)) (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))))>
#<alt (* -1 (* R (- (* -1/2 (PI)) (* -1 (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (- (* 1/2 (* R (PI))) (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* 1/2 (* R (PI)))>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* 1/2 (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))))>
#<alt (+ (* -1/2 (* phi1 (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1))))) (* 1/2 (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))))>
#<alt (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1/2 (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1)))) (* 1/2 (* phi1 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/2 (cos (- lambda2 lambda1)))))))))>
#<alt (+ (* 1/2 (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))) (* phi1 (+ (* -1/2 (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1)))) (* phi1 (+ (* -1/2 (* phi1 (+ (* -1/6 (sin (- lambda1 lambda2))) (* -1/6 (sin (- lambda2 lambda1)))))) (* 1/2 (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/2 (cos (- lambda2 lambda1))))))))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))>
#<alt (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))>
#<alt (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))>
#<alt (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))>
#<alt (* 1/2 (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))))>
#<alt (+ (* -1/2 (* lambda2 (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1)))))) (* 1/2 (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1)))))>
#<alt (+ (* 1/2 (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1)))) (* lambda2 (+ (* -1/2 (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1))))) (* 1/2 (* lambda2 (+ (* -1/2 (cos (+ lambda1 phi1))) (* -1/2 (cos (- phi1 lambda1)))))))))>
#<alt (+ (* 1/2 (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1)))) (* lambda2 (+ (* -1/2 (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1))))) (* lambda2 (+ (* -1/2 (* lambda2 (+ (* -1/6 (sin (- phi1 lambda1))) (* 1/6 (sin (+ lambda1 phi1)))))) (* 1/2 (+ (* -1/2 (cos (+ lambda1 phi1))) (* -1/2 (cos (- phi1 lambda1))))))))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))>
#<alt (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))>
#<alt (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))>
#<alt (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))>
#<alt (* 1/2 (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))))>
#<alt (+ (* -1/2 (* lambda1 (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1)))))) (* 1/2 (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2)))))>
#<alt (+ (* 1/2 (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2)))) (* lambda1 (+ (* -1/2 (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1))))) (* 1/2 (* lambda1 (+ (* -1/2 (cos (+ lambda2 phi1))) (* -1/2 (cos (- phi1 lambda2)))))))))>
#<alt (+ (* 1/2 (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2)))) (* lambda1 (+ (* -1/2 (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1))))) (* lambda1 (+ (* -1/2 (* lambda1 (+ (* -1/6 (sin (- phi1 lambda2))) (* 1/6 (sin (+ lambda2 phi1)))))) (* 1/2 (+ (* -1/2 (cos (+ lambda2 phi1))) (* -1/2 (cos (- phi1 lambda2))))))))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))>
#<alt (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))>
#<alt (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))>
#<alt (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (* R (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1)))))))>
#<alt (acos (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1)))))))>
#<alt (acos (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1)))))))>
#<alt (acos (* 1/2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1)))))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2)))))))>
#<alt (acos (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2)))))))>
#<alt (acos (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2)))))))>
#<alt (acos (* 1/2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2)))))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1)))))>
#<alt (acos (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1)))))))>
#<alt (acos (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1)))))))>
#<alt (acos (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1)))))))>
#<alt (acos (* 1/2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1)))))))>
#<alt (/ 2 (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))))>
#<alt (+ (* 2 (/ (* phi1 (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1)))) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 2))) (* 2 (/ 1 (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))))))>
#<alt (+ (* phi1 (- (* -1 (* phi1 (+ (* -2 (/ (pow (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1))) 2) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 3))) (* 2 (/ (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/2 (cos (- lambda2 lambda1)))) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 2)))))) (* -2 (/ (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1))) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 2))))) (* 2 (/ 1 (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))))))>
#<alt (+ (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -2 (/ (+ (* -1/6 (sin (- lambda1 lambda2))) (* -1/6 (sin (- lambda2 lambda1)))) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 2))) (+ (* 2 (/ (* (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1))) (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/2 (cos (- lambda2 lambda1))))) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 3))) (/ (* (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1))) (+ (* -2 (/ (pow (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1))) 2) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 3))) (* 2 (/ (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/2 (cos (- lambda2 lambda1)))) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 2))))) (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1)))))))) (+ (* -2 (/ (pow (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1))) 2) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 3))) (* 2 (/ (+ (* -1/2 (cos (- lambda1 lambda2))) (* -1/2 (cos (- lambda2 lambda1)))) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 2)))))) (* -2 (/ (+ (sin (- lambda1 lambda2)) (sin (- lambda2 lambda1))) (pow (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))) 2))))) (* 2 (/ 1 (+ (cos (- lambda1 lambda2)) (cos (- lambda2 lambda1))))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))>
#<alt (/ 2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))>
#<alt (/ 2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))>
#<alt (/ 2 (+ (cos (- lambda1 (+ lambda2 (* -1 phi1)))) (cos (- lambda2 (+ lambda1 (* -1 phi1))))))>
#<alt (/ 2 (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))))>
#<alt (+ (* 2 (/ (* lambda2 (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1))))) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 2))) (* 2 (/ 1 (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))))))>
#<alt (+ (* lambda2 (- (* -1 (* lambda2 (+ (* -2 (/ (pow (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1)))) 2) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 3))) (* 2 (/ (+ (* -1/2 (cos (+ lambda1 phi1))) (* -1/2 (cos (- phi1 lambda1)))) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 2)))))) (* -2 (/ (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1)))) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 2))))) (* 2 (/ 1 (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))))))>
#<alt (+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -2 (/ (+ (* -1/6 (sin (- phi1 lambda1))) (* 1/6 (sin (+ lambda1 phi1)))) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 2))) (+ (* 2 (/ (* (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1)))) (+ (* -1/2 (cos (+ lambda1 phi1))) (* -1/2 (cos (- phi1 lambda1))))) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 3))) (/ (* (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1)))) (+ (* -2 (/ (pow (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1)))) 2) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 3))) (* 2 (/ (+ (* -1/2 (cos (+ lambda1 phi1))) (* -1/2 (cos (- phi1 lambda1)))) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 2))))) (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1)))))))) (+ (* -2 (/ (pow (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1)))) 2) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 3))) (* 2 (/ (+ (* -1/2 (cos (+ lambda1 phi1))) (* -1/2 (cos (- phi1 lambda1)))) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 2)))))) (* -2 (/ (+ (sin (- phi1 lambda1)) (* -1 (sin (+ lambda1 phi1)))) (pow (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))) 2))))) (* 2 (/ 1 (+ (cos (+ lambda1 phi1)) (cos (- phi1 lambda1))))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))>
#<alt (/ 2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))>
#<alt (/ 2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))>
#<alt (/ 2 (+ (cos (+ lambda1 (+ phi1 (* -1 lambda2)))) (cos (- phi1 (+ lambda1 (* -1 lambda2))))))>
#<alt (/ 2 (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))))>
#<alt (+ (* 2 (/ (* lambda1 (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1))))) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 2))) (* 2 (/ 1 (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))))))>
#<alt (+ (* lambda1 (- (* -1 (* lambda1 (+ (* -2 (/ (pow (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1)))) 2) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 3))) (* 2 (/ (+ (* -1/2 (cos (+ lambda2 phi1))) (* -1/2 (cos (- phi1 lambda2)))) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 2)))))) (* -2 (/ (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1)))) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 2))))) (* 2 (/ 1 (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))))))>
#<alt (+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -2 (/ (+ (* -1/6 (sin (- phi1 lambda2))) (* 1/6 (sin (+ lambda2 phi1)))) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 2))) (+ (* 2 (/ (* (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1)))) (+ (* -1/2 (cos (+ lambda2 phi1))) (* -1/2 (cos (- phi1 lambda2))))) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 3))) (/ (* (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1)))) (+ (* -2 (/ (pow (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1)))) 2) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 3))) (* 2 (/ (+ (* -1/2 (cos (+ lambda2 phi1))) (* -1/2 (cos (- phi1 lambda2)))) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 2))))) (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2)))))))) (+ (* -2 (/ (pow (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1)))) 2) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 3))) (* 2 (/ (+ (* -1/2 (cos (+ lambda2 phi1))) (* -1/2 (cos (- phi1 lambda2)))) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 2)))))) (* -2 (/ (+ (sin (- phi1 lambda2)) (* -1 (sin (+ lambda2 phi1)))) (pow (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))) 2))))) (* 2 (/ 1 (+ (cos (+ lambda2 phi1)) (cos (- phi1 lambda2))))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (- (+ lambda1 phi1) lambda2)) (cos (- (+ lambda2 phi1) lambda1))))>
#<alt (/ 2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))>
#<alt (/ 2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))>
#<alt (/ 2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))>
#<alt (/ 2 (+ (cos (+ lambda2 (+ phi1 (* -1 lambda1)))) (cos (- phi1 (+ lambda2 (* -1 lambda1))))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (acos (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))>
#<alt (* (cos lambda1) (cos phi1))>
#<alt (+ (* phi2 (sin phi1)) (* (cos lambda1) (cos phi1)))>
#<alt (+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda1) (cos phi1)))))) (* (cos lambda1) (cos phi1)))>
#<alt (+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda1) (cos phi1)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (* (cos lambda1) (cos phi2))>
#<alt (+ (* phi1 (sin phi2)) (* (cos lambda1) (cos phi2)))>
#<alt (+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda1) (cos phi2)))))) (* (cos lambda1) (cos phi2)))>
#<alt (+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda1) (cos phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))>
#<alt (+ (* -1/2 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda1 2) (* (cos phi1) (cos phi2))))))))>
#<alt (+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda1 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))>
#<alt (* phi2 (sin phi1))>
#<alt (* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))>
#<alt (* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))>
#<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))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* phi1 (sin phi2))>
#<alt (* phi1 (+ (sin phi2) (* -1/6 (* (pow phi1 2) (sin phi2)))))>
#<alt (* phi1 (+ (sin phi2) (* (pow phi1 2) (+ (* -1/6 (sin phi2)) (* 1/120 (* (pow phi1 2) (sin phi2)))))))>
#<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))))))))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2)))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (* R (- (* 1/2 (PI)) (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (* R (asin (+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))))>
#<alt (cos (- lambda1 lambda2))>
#<alt (+ (cos (- lambda1 lambda2)) (* -1 (* phi1 (sin (- lambda1 lambda2)))))>
#<alt (+ (cos (- lambda1 lambda2)) (* phi1 (- (* -1/2 (* phi1 (cos (- lambda1 lambda2)))) (sin (- lambda1 lambda2)))))>
#<alt (+ (cos (- lambda1 lambda2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (- lambda1 lambda2))) (* 1/6 (* phi1 (sin (- lambda1 lambda2)))))) (sin (- lambda1 lambda2)))))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- lambda1 (+ lambda2 (* -1 phi1))))>
#<alt (cos (- lambda1 (+ lambda2 (* -1 phi1))))>
#<alt (cos (- lambda1 (+ lambda2 (* -1 phi1))))>
#<alt (cos (- lambda1 (+ lambda2 (* -1 phi1))))>
#<alt (cos (+ lambda1 phi1))>
#<alt (+ (cos (+ lambda1 phi1)) (* lambda2 (sin (+ lambda1 phi1))))>
#<alt (+ (cos (+ lambda1 phi1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (+ lambda1 phi1)))) (* -1 (sin (+ lambda1 phi1))))))>
#<alt (+ (cos (+ lambda1 phi1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (+ lambda1 phi1))) (* -1/6 (* lambda2 (sin (+ lambda1 phi1)))))) (* -1 (sin (+ lambda1 phi1))))))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (+ lambda1 (+ phi1 (* -1 lambda2))))>
#<alt (cos (+ lambda1 (+ phi1 (* -1 lambda2))))>
#<alt (cos (+ lambda1 (+ phi1 (* -1 lambda2))))>
#<alt (cos (+ lambda1 (+ phi1 (* -1 lambda2))))>
#<alt (cos (- phi1 lambda2))>
#<alt (+ (cos (- phi1 lambda2)) (* -1 (* lambda1 (sin (- phi1 lambda2)))))>
#<alt (+ (cos (- phi1 lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (- phi1 lambda2)))) (sin (- phi1 lambda2)))))>
#<alt (+ (cos (- phi1 lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (- phi1 lambda2))) (* 1/6 (* lambda1 (sin (- phi1 lambda2)))))) (sin (- phi1 lambda2)))))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- (+ lambda1 phi1) lambda2))>
#<alt (cos (- phi1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (- phi1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (- phi1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (- phi1 (+ lambda2 (* -1 lambda1))))>
#<alt (cos (- lambda2 lambda1))>
#<alt (+ (cos (- lambda2 lambda1)) (* -1 (* phi1 (sin (- lambda2 lambda1)))))>
#<alt (+ (cos (- lambda2 lambda1)) (* phi1 (- (* -1/2 (* phi1 (cos (- lambda2 lambda1)))) (sin (- lambda2 lambda1)))))>
#<alt (+ (cos (- lambda2 lambda1)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (- lambda2 lambda1))) (* 1/6 (* phi1 (sin (- lambda2 lambda1)))))) (sin (- lambda2 lambda1)))))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- lambda2 (+ lambda1 (* -1 phi1))))>
#<alt (cos (- lambda2 (+ lambda1 (* -1 phi1))))>
#<alt (cos (- lambda2 (+ lambda1 (* -1 phi1))))>
#<alt (cos (- lambda2 (+ lambda1 (* -1 phi1))))>
#<alt (cos (- phi1 lambda1))>
#<alt (+ (cos (- phi1 lambda1)) (* -1 (* lambda2 (sin (- phi1 lambda1)))))>
#<alt (+ (cos (- phi1 lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (- phi1 lambda1)))) (sin (- phi1 lambda1)))))>
#<alt (+ (cos (- phi1 lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (- phi1 lambda1))) (* 1/6 (* lambda2 (sin (- phi1 lambda1)))))) (sin (- phi1 lambda1)))))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- phi1 (+ lambda1 (* -1 lambda2))))>
#<alt (cos (- phi1 (+ lambda1 (* -1 lambda2))))>
#<alt (cos (- phi1 (+ lambda1 (* -1 lambda2))))>
#<alt (cos (- phi1 (+ lambda1 (* -1 lambda2))))>
#<alt (cos (+ lambda2 phi1))>
#<alt (+ (cos (+ lambda2 phi1)) (* lambda1 (sin (+ lambda2 phi1))))>
#<alt (+ (cos (+ lambda2 phi1)) (* lambda1 (- (* -1/2 (* lambda1 (cos (+ lambda2 phi1)))) (* -1 (sin (+ lambda2 phi1))))))>
#<alt (+ (cos (+ lambda2 phi1)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (+ lambda2 phi1))) (* -1/6 (* lambda1 (sin (+ lambda2 phi1)))))) (* -1 (sin (+ lambda2 phi1))))))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (- (+ lambda2 phi1) lambda1))>
#<alt (cos (+ lambda2 (+ phi1 (* -1 lambda1))))>
#<alt (cos (+ lambda2 (+ phi1 (* -1 lambda1))))>
#<alt (cos (+ lambda2 (+ phi1 (* -1 lambda1))))>
#<alt (cos (+ lambda2 (+ phi1 (* -1 lambda1))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>
#<alt (asin (+ (* (cos lambda2) (cos phi2)) (* (sin phi1) (sin phi2))))>

Calls

174 calls:

Time	Variable		Point	Expression
13.0ms	phi1	@	-inf	(+ (* (sqrt (PI)) (/ (sqrt (PI)) 2)) (neg (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2))))))
1.0ms	lambda2	@	0	(/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))
1.0ms	phi1	@	0	(/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))
1.0ms	lambda1	@	0	(/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))
1.0ms	lambda1	@	0	(/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1))))))

rewrite348.0ms (1.5%)

Algorithm

1×	batch-egg-rewrite

Rules

3312×	`-lowering-.f32`
3312×	`-lowering-.f64`
1524×	`pow-lowering-pow.f64`
1524×	`pow-lowering-pow.f32`
1512×	`fma-lowering-fma.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	54	256
1	340	194
2	3173	194
0	8137	194

Stop Event

1×	iter limit
1×	node limit

Counts

21 → 389

Calls

Call 1

Inputs
(- (* R (/ (PI) 2)) (* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) R))
(* R (/ (PI) 2))
(/ (PI) 2)
(PI)
(* lambda1 R)
(/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1))))))
(* (acos (/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1))))))) R)
(acos (/ 1 (/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))))
(/ 2 (+ (cos (+ phi1 (- lambda2 lambda1))) (cos (- phi1 (- lambda2 lambda1)))))
(* (acos (+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1))))) R)
(acos (+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1)))))
(+ (* (sin phi2) (sin phi1)) (* (cos lambda1) (* (cos phi2) (cos phi1))))
(* (sin phi2) (sin phi1))
(+ (* (sqrt (PI)) (/ (sqrt (PI)) 2)) (neg (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2))))))
(* (+ (* (sqrt (PI)) (/ (sqrt (PI)) 2)) (neg (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2)))))) R)
(sqrt (PI))
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2)))))))
(* (asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (* (cos phi1) (+ (* (sin lambda1) (sin lambda2)) (* (cos lambda1) (cos lambda2))))))) R)
(cos (- phi1 (- lambda2 lambda1)))
(cos (+ phi1 (- lambda2 lambda1)))
(asin (+ (* (sin phi1) (sin phi2)) (* (cos phi2) (cos lambda2))))

Outputs
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(+.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(+.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(+.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(-.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(-.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(-.f64 (/.f64 (.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64)) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) R) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (sqrt.f64 (PI.f64)) (.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) R) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (sqrt.f64 (PI.f64)) R) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 (.f64 R (sqrt.f64 (PI.f64))) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (.f64 R (sqrt.f64 (PI.f64))) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(fma.f64 (.f64 R (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))) (sqrt.f64 (PI.f64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(fma.f64 (.f64 R (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))) (sqrt.f64 (PI.f64)) (neg.f64 (-.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (-.f64 (.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)))) (neg.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 (+.f64 (.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (-.f64 (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64)) (.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R))))))
(/.f64 (+.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) #s(literal 2 binary64)) (.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) #s(literal 2 binary64))) (-.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R))))
(/.f64 (-.f64 (pow.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)) (pow.f64 (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) #s(literal 2 binary64))) (-.f64 (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (+.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(pow.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (-.f64 (.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(.f64 (-.f64 (.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 R (PI.f64))))
(/.f64 (*.f64 R (PI.f64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 R (PI.f64))) #s(literal -2 binary64))
(/.f64 (*.f64 R #s(literal 1 binary64)) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) R) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) R) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 R (PI.f64))) #s(literal -1 binary64))
(*.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (PI.f64) (.f64 #s(literal 1/2 binary64) R))
(*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R)
(.f64 (sqrt.f64 (PI.f64)) (.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) R))
(.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (sqrt.f64 (PI.f64)) R))
(.f64 (.f64 R (PI.f64)) #s(literal 1/2 binary64))
(.f64 (.f64 R (sqrt.f64 (PI.f64))) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(.f64 (.f64 R (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))) (sqrt.f64 (PI.f64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (PI.f64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (PI.f64) #s(literal -2 binary64)))
(/.f64 (PI.f64) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (PI.f64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)))
(/.f64 (sqrt.f64 (PI.f64)) (/.f64 #s(literal 2 binary64) (sqrt.f64 (PI.f64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (PI.f64))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (PI.f64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (PI.f64) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (PI.f64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64))
(PI.f64)
(log.f64 (exp.f64 (PI.f64)))
(log.f64 (+.f64 #s(literal 1 binary64) (expm1.f64 (PI.f64))))
(exp.f64 (log.f64 (PI.f64)))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (PI.f64))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/3 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(-.f64 (exp.f64 (log1p.f64 (PI.f64))) #s(literal 1 binary64))
(sqrt.f64 (*.f64 (PI.f64) (PI.f64)))
(cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))))
(expm1.f64 (log1p.f64 (PI.f64)))
(log1p.f64 (expm1.f64 (PI.f64)))
(pow.f64 (PI.f64) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/2 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (PI.f64) (log.f64 (exp.f64 #s(literal 1 binary64))))
(*.f64 #s(literal 1 binary64) (PI.f64))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (log.f64 (exp.f64 (sqrt.f64 (PI.f64)))))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (log.f64 (exp.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)))))
(.f64 (cbrt.f64 (PI.f64)) (pow.f64 (.f64 (cbrt.f64 (PI.f64)) (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 2 binary64)))
(.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (pow.f64 (.f64 (sqrt.f64 (PI.f64)) (PI.f64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (cbrt.f64 (PI.f64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (PI.f64) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/2 binary64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (sqrt.f64 (PI.f64))) #s(literal 1/3 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(.f64 (pow.f64 (.f64 (*.f64 (PI.f64) (PI.f64)) (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 1/3 binary64)) (cbrt.f64 (cbrt.f64 (PI.f64))))
(*.f64 R lambda1)
(*.f64 lambda1 R)
(+.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))) (.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))))
(+.f64 (.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) #s(literal 1/2 binary64)))
(+.f64 (.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) #s(literal 1/2 binary64)) (.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -1 binary64)))
(fma.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(/.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (-.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 lambda1 (-.f64 phi1 lambda2))))))) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (.f64 (cos.f64 phi1) (+.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 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (cos.f64 phi1) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (-.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 lambda1 (-.f64 phi1 lambda2)))))))) (-.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 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)) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))))) (cos.f64 phi1)) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 (+.f64 (-.f64 lambda1 lambda2) phi1)) (cos.f64 (-.f64 (-.f64 lambda1 lambda2) phi1))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))))
(.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))))))
(*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))))) #s(literal -1 binary64)))
(.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (-.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))))))))
(.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 lambda1 (-.f64 phi1 lambda2)))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))))))
(.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (pow.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -1 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))))
(/.f64 #s(literal 2 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))))))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))))))
(/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(/.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))))))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))))))
(/.f64 (/.f64 #s(literal -1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64))
(pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(.f64 #s(literal 2 binary64) (pow.f64 (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) #s(literal -1 binary64)))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal -1 binary64)))
(.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))))))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(.f64 (/.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (-.f64 (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))) (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))))))
(.f64 (/.f64 #s(literal 2 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 lambda1 (-.f64 phi1 lambda2)))))))) (-.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal -1 binary64)) (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal -1 binary64)))
(.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))
(+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) (/.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))
(fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))
(fma.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (cos.f64 lambda1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(fma.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 2 binary64)) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (sin.f64 phi1) (.f64 (sin.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 2 binary64))) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(pow.f64 (/.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))
(.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))))))
(-.f64 (/.f64 (cos.f64 (-.f64 phi2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2)))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2)))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(+.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal -2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)) (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
(-.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 #s(literal -1 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64)))) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (+.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal -1 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64))) (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))
(/.f64 (-.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)) (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64))) (-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(pow.f64 (/.f64 (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))))
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R))
(+.f64 (.f64 R (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R) (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))))
(/.f64 (.f64 R (+.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64))))) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (.f64 R (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)))) (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(/.f64 (.f64 (+.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (neg.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64)))) R) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (-.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64))) R) (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (PI.f64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(fabs.f64 (sqrt.f64 (PI.f64)))
(sqrt.f64 (PI.f64))
(pow.f64 (PI.f64) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3/2 binary64))
(pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64))
(pow.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/6 binary64))
(pow.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (PI.f64) #s(literal 1/6 binary64)))
(*.f64 (cbrt.f64 (PI.f64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/6 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) (pow.f64 (PI.f64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(+.f64 (.f64 (cos.f64 (-.f64 phi1 lambda2)) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 phi1 lambda2)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (+.f64 (.f64 phi1 phi1) (.f64 (-.f64 lambda2 lambda1) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (cos.f64 (/.f64 (.f64 (-.f64 lambda2 lambda1) (.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (+.f64 (.f64 phi1 phi1) (.f64 (-.f64 lambda2 lambda1) (+.f64 phi1 (-.f64 lambda2 lambda1))))))) (.f64 (sin.f64 (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (+.f64 (.f64 phi1 phi1) (.f64 (-.f64 lambda2 lambda1) (+.f64 phi1 (-.f64 lambda2 lambda1)))))) (sin.f64 (/.f64 (.f64 (-.f64 lambda2 lambda1) (.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (+.f64 (.f64 phi1 phi1) (.f64 (-.f64 lambda2 lambda1) (+.f64 phi1 (-.f64 lambda2 lambda1))))))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi1 (-.f64 lambda2 lambda1)))) (cos.f64 (/.f64 (.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)) (+.f64 phi1 (-.f64 lambda2 lambda1))))) (.f64 (sin.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi1 (-.f64 lambda2 lambda1)))) (sin.f64 (/.f64 (.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)) (+.f64 phi1 (-.f64 lambda2 lambda1))))))
(cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1)))))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1))) (sin.f64 phi1)))
(-.f64 (.f64 (cos.f64 (-.f64 phi1 lambda2)) (cos.f64 lambda1)) (.f64 (sin.f64 (-.f64 phi1 lambda2)) (sin.f64 lambda1)))
(-.f64 (.f64 (cos.f64 lambda1) (cos.f64 (-.f64 phi1 lambda2))) (.f64 (sin.f64 lambda1) (sin.f64 (-.f64 phi1 lambda2))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1))))))
(fma.f64 (cos.f64 (-.f64 phi1 lambda2)) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 (-.f64 phi1 lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))))
(+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (+.f64 (.f64 (sin.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1))) (sin.f64 phi1)) (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (neg.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 (-.f64 lambda2 lambda1))))
(+.f64 (.f64 (cos.f64 (+.f64 phi1 lambda2)) (cos.f64 lambda1)) (.f64 (sin.f64 (+.f64 phi1 lambda2)) (sin.f64 lambda1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 (-.f64 lambda1 phi1))) (.f64 (sin.f64 lambda2) (sin.f64 (-.f64 lambda1 phi1))))
(+.f64 (.f64 (cos.f64 (/.f64 (.f64 phi1 phi1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) (cos.f64 (/.f64 (.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)) (+.f64 lambda1 (-.f64 phi1 lambda2))))) (.f64 (sin.f64 (/.f64 (.f64 phi1 phi1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) (sin.f64 (/.f64 (.f64 (-.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)) (+.f64 lambda1 (-.f64 phi1 lambda2))))))
(cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)))
(-.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (.f64 (cos.f64 (+.f64 phi1 lambda2)) (cos.f64 lambda1)) (.f64 (sin.f64 (+.f64 phi1 lambda2)) (sin.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(-.f64 (.f64 (cos.f64 lambda2) (cos.f64 (+.f64 (-.f64 #s(literal 0 binary64) lambda1) phi1))) (.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (-.f64 #s(literal 0 binary64) lambda1) phi1))))
(fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal 1 binary64) (.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))) (neg.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (neg.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1 binary64) (neg.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (neg.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2)))) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))))) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda1 (-.f64 phi1 lambda2))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (.f64 (cbrt.f64 (PI.f64)) #s(literal 1/2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64)) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))))
(/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))

simplify407.0ms (1.7%)

Algorithm

1×	egg-herbie

Rules

4672×	`-lowering-.f32`
4672×	`-lowering-.f64`
2194×	`+-lowering-+.f64`
2194×	`+-lowering-+.f32`
1928×	`sum4-define`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	481	12293
1	1640	12071
2	6263	12070
0	8325	12070

Stop Event

1×	iter limit
1×	node limit

Counts

696 → 696

Calls

Call 1

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

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

eval151.0ms (0.6%)

Compiler: Compiled 32649 to 2574 computations (92.1% saved)

prune306.0ms (1.3%)

Pruning

116 alts after pruning (109 fresh and 7 done)

	Pruned	Kept	Total
New	1154	30	1184
Fresh	21	79	100
Picked	1	4	5
Done	0	3	3
Total	1176	116	1292

Accuracy

97.0%

Counts

1292 → 116

Alt Table

Click to see full alt table

Status	Accuracy	Program
	73.3%	(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
	74.1%	(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
	74.1%	(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
	38.6%	(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))
	28.6%	(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64))) R) (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
	38.5%	(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
	74.2%	(-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 R (PI.f64)))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	91.0%	(-.f64 (.f64 R (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))
	73.2%	(-.f64 (.f64 R (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	91.8%	(-.f64 (.f64 R (/.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))
	73.9%	(-.f64 (.f64 R (/.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	73.7%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R))
	74.3%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R))
✓	92.3%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))
	47.5%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2))))))) R))
	47.6%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (.f64 lambda2 #s(literal -1/2 binary64)))))))))) R))
	54.1%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))))) R))
	55.9%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))) R))
	42.5%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	38.8%	(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
	28.6%	(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R))
	91.0%	(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))) R))
	53.3%	(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
	92.1%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) R))
	38.2%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	29.6%	(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
	39.6%	(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	55.1%	(.f64 (fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))))) R)
	39.5%	(.f64 (fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	74.2%	(.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) R)
	53.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))) R)
✓	27.8%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
	6.2%	(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
	74.2%	(.f64 (/.f64 (+.f64 (.f64 (PI.f64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	6.2%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
	9.1%	(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
	54.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))) R)
	28.6%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
	56.0%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
	40.2%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	40.1%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	9.8%	(*.f64 (-.f64 lambda2 lambda1) R)
	3.5%	(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
	74.2%	(.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	6.2%	(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
	19.7%	(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
	21.3%	(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	28.6%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
	26.4%	(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	22.2%	(.f64 (acos.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) R)
	50.6%	(.f64 (acos.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	26.8%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
	23.4%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
	21.1%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	18.0%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 lambda2)) (.f64 lambda1 (sin.f64 (-.f64 phi1 lambda2)))))))) R)
	13.9%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (sin.f64 (-.f64 lambda1 lambda2)))))))) R)
	27.0%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 lambda2)))))) R)
	26.8%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 lambda1)))))) R)
	74.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	40.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	40.2%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal -1 binary64))))) R)
	74.4%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	11.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))) R)
	74.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
✓	56.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
✓	92.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	47.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 (sin.f64 lambda1) (+.f64 (.f64 lambda2 (.f64 lambda2 #s(literal -1/6 binary64))) #s(literal 1 binary64))))))))) R)
	47.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))))))))) R)
	49.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))) R)
	74.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
	11.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 lambda1 (.f64 lambda1 (.f64 lambda1 (.f64 (sin.f64 lambda2) #s(literal -1/6 binary64)))))))) R)
	49.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	28.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
	48.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
✓	54.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
	56.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
	34.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
	29.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
	17.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi2))) R)
	14.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 lambda2))) R)
	26.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	41.8%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (sin.f64 phi1)))) R)
	25.0%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) R)
	27.1%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
	31.5%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	29.4%	(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	9.5%	(.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))) R)
	13.1%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	13.0%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	49.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	29.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
	28.9%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
	48.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	48.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	48.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	21.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2))))))) R)
	21.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)))))))) R)
	24.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
	25.9%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
	30.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
	31.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
	29.8%	(.f64 (acos.f64 (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))) R)
	15.4%	(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
	7.9%	(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
	11.2%	(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
	7.3%	(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
	9.8%	(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
✓	21.1%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
	9.1%	(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
	17.1%	(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
	17.7%	(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
	14.5%	(*.f64 (acos.f64 (cos.f64 lambda2)) R)
	14.4%	(*.f64 (acos.f64 (cos.f64 lambda1)) R)
✓	3.6%	(*.f64 lambda1 R)
	92.6%	(.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))

Compiler

Compiled 8088 to 3102 computations (61.6% saved)

regimes957.0ms (4%)

Counts

175 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 lambda1)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (sin.f64 (-.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 lambda2)) (.f64 lambda1 (sin.f64 (-.f64 phi1 lambda2)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal -1 binary64))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)))))))) R)
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))) (.f64 (.f64 phi2 phi2) (.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2)))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1)))) R)
(.f64 (acos.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))))) R)
(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 lambda1 (.f64 lambda1 (.f64 lambda1 (.f64 (sin.f64 lambda2) #s(literal -1/6 binary64)))))))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 R (PI.f64)))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 R (PI.f64)))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/24 binary64))))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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)) (+.f64 (cos.f64 lambda1) (*.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)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)))
(fma.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))))))) R))
(-.f64 (.f64 R (/.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(+.f64 (.f64 (/.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (cos.f64 (+.f64 lambda1 lambda2))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(.f64 (fma.f64 (pow.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 1/4 binary64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R)
(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) R))
(-.f64 (.f64 R (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (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 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) R)
(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda1 lambda2))))))) R)
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (.f64 lambda2 #s(literal -1/2 binary64)))))))))) R))
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 (sin.f64 lambda1) (+.f64 (.f64 lambda2 (.f64 lambda2 #s(literal -1/6 binary64))) #s(literal 1 binary64))))))))) R)
(.f64 (acos.f64 (/.f64 (+.f64 (.f64 (.f64 (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (+.f64 (.f64 lambda1 (.f64 lambda1 #s(literal 1/6 binary64))) #s(literal -1 binary64))))))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))) R)
(.f64 (fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
(.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (asin.f64 (+.f64 (.f64 (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (.f64 (sqrt.f64 (PI.f64)) R) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (-.f64 #s(literal 0 binary64) R)))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
(-.f64 (.f64 R (/.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))
(.f64 (acos.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(-.f64 (.f64 R (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) R))
(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))) R))
(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) #s(literal 2 binary64))) R) (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 0 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(.f64 (acos.f64 (.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))))) R)
(.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) R) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64))) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(/.f64 (-.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64))) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(.f64 (/.f64 (-.f64 (.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 1/8 binary64)) (pow.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (+.f64 (.f64 (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1))))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))) R))
(.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (/.f64 (PI.f64) #s(literal 2 binary64))) R)
(.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal -2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2)))))) (-.f64 (.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
(.f64 (acos.f64 (/.f64 (+.f64 (pow.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) R)
(.f64 (/.f64 (+.f64 (.f64 (PI.f64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
(.f64 (-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
(/.f64 (.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64))) R) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))) (/.f64 (pow.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(-.f64 (/.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))) (/.f64 (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 2 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))))))
(/.f64 (+.f64 (.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64))) (pow.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 R (PI.f64)) (.f64 R (PI.f64))) #s(literal 4 binary64)) (.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (-.f64 (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)) (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(+.f64 (.f64 (/.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))))) R))
(.f64 (-.f64 (/.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 8 binary64)) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 3 binary64)) (+.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) R)

Outputs

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

(*.f64 (-.f64 lambda2 lambda1) R)

Calls

10 calls:

361.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
76.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
75.0ms	(-.f64 lambda1 lambda2)
75.0ms	R
75.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
92.8%	1	`R`
92.8%	1	`lambda1`
92.8%	1	`lambda2`
92.8%	1	`phi1`
92.8%	1	`phi2`
96.4%	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)`
96.4%	2	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
96.4%	2	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
92.8%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
92.8%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes481.0ms (2%)

Counts

136 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

10 calls:

56.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
55.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)
51.0ms	lambda2
49.0ms	phi2
45.0ms	R

Results

Accuracy	Segments	Branch
74.9%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
74.9%	1	`R`
79.4%	3	`lambda2`
78.1%	2	`lambda1`
85.4%	3	`phi1`
74.9%	1	`(-.f64 lambda1 lambda2)`
82.9%	3	`phi2`
78.5%	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)`
78.5%	2	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
78.5%	2	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`

Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes56.0ms (0.2%)

Counts

109 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

31.0ms

phi1

Results

Accuracy	Segments	Branch
85.2%	3	`phi1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes72.0ms (0.3%)

Counts

102 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

28.0ms

phi1

Results

Accuracy	Segments	Branch
85.1%	3	`phi1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes71.0ms (0.3%)

Counts

88 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

39.0ms

phi1

Results

Accuracy	Segments	Branch
85.1%	3	`phi1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes233.0ms (1%)

Counts

81 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

45.0ms	lambda1
42.0ms	phi2
39.0ms	phi1
25.0ms	(cos.f64 (-.f64 lambda1 lambda2))
23.0ms	R

Results

Accuracy	Segments	Branch
64.0%	2	`(-.f64 lambda1 lambda2)`
63.3%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
59.7%	2	`R`
79.2%	4	`lambda2`
77.8%	3	`lambda1`
73.7%	3	`phi2`
77.0%	4	`phi1`

Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes111.0ms (0.5%)

Counts

76 → 3

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 lambda1)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (sin.f64 (-.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 lambda2)) (.f64 lambda1 (sin.f64 (-.f64 phi1 lambda2)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal -1 binary64))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)))))))) R)
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))) (.f64 (.f64 phi2 phi2) (.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2)))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R)

Outputs

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

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

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

Calls

3 calls:

25.0ms	lambda1
22.0ms	lambda2
21.0ms	phi1

Results

Accuracy	Segments	Branch
75.1%	3	`phi1`
75.3%	3	`lambda2`
62.6%	2	`lambda1`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes98.0ms (0.4%)

Counts

75 → 3

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 lambda1)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (sin.f64 (-.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 lambda2)) (.f64 lambda1 (sin.f64 (-.f64 phi1 lambda2)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal -1 binary64))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)))))))) R)
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))) (.f64 (.f64 phi2 phi2) (.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2)))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)

Outputs

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

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

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

Calls

3 calls:

34.0ms	phi1
27.0ms	lambda2
22.0ms	phi2

Results

Accuracy	Segments	Branch
70.4%	2	`phi2`
72.4%	3	`phi1`
57.2%	3	`lambda2`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes61.0ms (0.3%)

Counts

74 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 lambda1)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (sin.f64 (-.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 lambda2)) (.f64 lambda1 (sin.f64 (-.f64 phi1 lambda2)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal -1 binary64))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)))))))) R)
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))) (.f64 (.f64 phi2 phi2) (.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2)))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)

Outputs

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

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

Calls

2 calls:

23.0ms	phi2
22.0ms	phi1

Results

Accuracy	Segments	Branch
64.5%	2	`phi2`
61.7%	3	`phi1`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes147.0ms (0.6%)

Counts

73 → 3

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 lambda1)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (sin.f64 (-.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 lambda2)) (.f64 lambda1 (sin.f64 (-.f64 phi1 lambda2)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (pow.f64 (pow.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64)) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal -1 binary64)) (pow.f64 (cos.f64 phi1) #s(literal -1 binary64))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)))))))) R)
(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1))) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R))
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (.f64 lambda1 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64))) (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (sin.f64 lambda2))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))) (.f64 (.f64 phi2 phi2) (.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2)))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (.f64 (sin.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 lambda2 lambda2) (.f64 (cos.f64 phi2) (+.f64 (.f64 (.f64 lambda2 lambda2) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)

Outputs

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

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

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

Calls

6 calls:

32.0ms	(-.f64 lambda1 lambda2)
22.0ms	R
22.0ms	phi2
21.0ms	phi1
21.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

Accuracy	Segments	Branch
42.5%	1	`R`
58.4%	3	`phi1`
50.7%	4	`lambda1`
52.7%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
54.7%	3	`(-.f64 lambda1 lambda2)`
58.3%	3	`phi2`

Compiler

Compiled 41 to 33 computations (19.5% saved)

regimes38.0ms (0.2%)

Counts

53 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (+.f64 (cos.f64 lambda2) (.f64 lambda1 (sin.f64 lambda2)))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 lambda1)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 lambda2)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (-.f64 phi1 lambda1)) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 phi1 (-.f64 lambda2 lambda1))))))) R)
(.f64 (acos.f64 (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 lambda1 (-.f64 phi1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 (+.f64 phi1 (-.f64 lambda2 lambda1)) phi1) (-.f64 lambda2 lambda1)) #s(literal 2 binary64)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (cos.f64 phi2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (+.f64 (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 phi1 (sin.f64 (-.f64 lambda1 lambda2)))))))) R)
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 phi1 lambda2)) (.f64 lambda1 (sin.f64 (-.f64 phi1 lambda2)))))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))) R)

Outputs
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)

Calls

2 calls:

16.0ms	phi2
16.0ms	phi1

Results

Accuracy	Segments	Branch
56.4%	2	`phi2`
56.5%	2	`phi1`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes48.0ms (0.2%)

Counts

26 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)

Outputs
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)

Calls

5 calls:

10.0ms	phi2
10.0ms	(-.f64 lambda1 lambda2)
8.0ms	phi1
8.0ms	lambda2
8.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

Accuracy	Segments	Branch
40.3%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
40.3%	1	`(-.f64 lambda1 lambda2)`
45.5%	3	`lambda2`
51.5%	2	`phi2`
48.8%	2	`phi1`

Compiler

Compiled 35 to 28 computations (20% saved)

regimes30.0ms (0.1%)

Counts

25 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)

Outputs
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R)

Calls

3 calls:

9.0ms	phi2
9.0ms	lambda1
8.0ms	phi1

Results

Accuracy	Segments	Branch
40.4%	2	`lambda1`
44.2%	2	`phi1`
43.6%	2	`phi2`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes36.0ms (0.2%)

Counts

24 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)

Outputs
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R)

Calls

4 calls:

9.0ms	phi1
9.0ms	lambda2
7.0ms	phi2
7.0ms	R

Results

Accuracy	Segments	Branch
43.5%	2	`phi2`
45.2%	4	`lambda2`
34.0%	2	`R`
43.6%	2	`phi1`

Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes72.0ms (0.3%)

Counts

23 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)

Outputs
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)

Calls

5 calls:

36.0ms	(cos.f64 (-.f64 lambda1 lambda2))
11.0ms	phi1
8.0ms	lambda2
7.0ms	(-.f64 lambda1 lambda2)
7.0ms	phi2

Results

Accuracy	Segments	Branch
31.4%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
31.4%	1	`(-.f64 lambda1 lambda2)`
40.5%	2	`lambda2`
31.4%	1	`phi2`
35.5%	2	`phi1`

Compiler

Compiled 35 to 28 computations (20% saved)

regimes29.0ms (0.1%)

Counts

22 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)

Outputs
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)

Calls

2 calls:

19.0ms	lambda1
7.0ms	lambda2

Results

Accuracy	Segments	Branch
33.3%	2	`lambda1`
36.0%	2	`lambda2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes52.0ms (0.2%)

Counts

21 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))) R)

Outputs
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)

Calls

7 calls:

8.0ms	phi1
8.0ms	(-.f64 lambda1 lambda2)
7.0ms	lambda1
7.0ms	R
7.0ms	lambda2

Results

Accuracy	Segments	Branch
21.1%	1	`phi2`
25.2%	2	`(-.f64 lambda1 lambda2)`
25.3%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
21.1%	1	`lambda1`
21.1%	1	`R`
21.1%	1	`phi1`
21.1%	1	`lambda2`

Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes11.0ms (0%)

Counts

10 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)

Outputs
(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
(*.f64 (-.f64 lambda2 lambda1) R)

Calls

2 calls:

5.0ms	(-.f64 lambda1 lambda2)
4.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

Accuracy	Segments	Branch
25.2%	2	`(-.f64 lambda1 lambda2)`
25.2%	2	`(cos.f64 (-.f64 lambda1 lambda2))`

Compiler

Compiled 17 to 13 computations (23.5% saved)

regimes21.0ms (0.1%)

Counts

9 → 3

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)

Outputs
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)

Calls

5 calls:

5.0ms	R
4.0ms	phi1
4.0ms	phi2
3.0ms	lambda2
3.0ms	lambda1

Results

Accuracy	Segments	Branch
21.2%	2	`lambda2`
14.5%	1	`phi2`
16.6%	2	`R`
22.8%	3	`lambda1`
14.5%	1	`phi1`

Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes8.0ms (0%)

Counts

8 → 2

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)

Outputs
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (-.f64 lambda2 lambda1) R)

Calls

2 calls:

4.0ms	lambda1
3.0ms	lambda2

Results

Accuracy	Segments	Branch
14.4%	1	`lambda2`
18.3%	2	`lambda1`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes17.0ms (0.1%)

Counts

7 → 1

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 (-.f64 lambda2 lambda1) R)
(.f64 (-.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (+.f64 lambda1 lambda2)))) R)
(.f64 (.f64 (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda2 lambda2) (.f64 lambda1 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 lambda1 (*.f64 lambda1 lambda1))))) R)

Outputs
(*.f64 (-.f64 lambda2 lambda1) R)

Calls

5 calls:

3.0ms	lambda2
3.0ms	R
3.0ms	phi2
3.0ms	phi1
3.0ms	lambda1

Results

Accuracy	Segments	Branch
9.8%	1	`lambda2`
9.8%	1	`phi2`
9.8%	1	`phi1`
9.8%	1	`R`
9.8%	1	`lambda1`

Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes9.0ms (0%)

Accuracy

Total -0.9b remaining (-1.5%)

Threshold costs -0.9b (-1.5%)

Counts

2 → 1

Calls

Call 1

Inputs
(*.f64 lambda1 R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)

Outputs
(*.f64 lambda1 R)

Calls

5 calls:

2.0ms	lambda2
2.0ms	phi1
2.0ms	R
2.0ms	phi2
2.0ms	lambda1

Results

Accuracy	Segments	Branch
3.6%	1	`phi1`
3.6%	1	`lambda1`
3.6%	1	`phi2`
3.6%	1	`lambda2`
3.6%	1	`R`

Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch3.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9999999999999843	1.0

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch166.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
89.0ms	1.994207233499716e-27	2.0137283128526044e-13
67.0ms	-0.0025574627385317114	-1.5327822478705777e-12

Results

131.0ms	239×	1	valid
14.0ms	65×	0	valid

Compiler

Compiled 1053 to 758 computations (28% saved)

Precisions

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

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

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

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

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

backward-pass: 9.0ms (8.3% of total)

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

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

const: 0.0ms (0% of total)

bsearch213.0ms (0.9%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
98.0ms	1.994207233499716e-27	2.0137283128526044e-13
106.0ms	-0.0025574627385317114	-1.5327822478705777e-12

Results

143.0ms	248×	1	valid
12.0ms	56×	0	valid

Compiler

Compiled 1080 to 776 computations (28.1% saved)

Precisions

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

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

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

ival-acos: 25.0ms (19.7% of total)

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

backward-pass: 8.0ms (6.3% of total)

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

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

const: 0.0ms (0% of total)

bsearch170.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
85.0ms	1.994207233499716e-27	2.0137283128526044e-13
76.0ms	-0.0025574627385317114	-1.5327822478705777e-12

Results

133.0ms	243×	1	valid
16.0ms	61×	0	valid

Compiler

Compiled 980 to 716 computations (26.9% saved)

Precisions

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

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

ival-sin: 34.0ms (27.9% of total)

ival-mult: 20.0ms (16.4% of total)

ival-acos: 14.0ms (11.5% of total)

backward-pass: 9.0ms (7.4% of total)

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

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

const: 0.0ms (0% of total)

bsearch190.0ms (0.8%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
103.0ms	1.994207233499716e-27	2.0137283128526044e-13
78.0ms	-0.0025574627385317114	-1.5327822478705777e-12

Results

152.0ms	248×	1	valid
17.0ms	56×	0	valid

Compiler

Compiled 944 to 689 computations (27% saved)

Precisions

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

ival-cos: 50.0ms (35.6% of total)

ival-sin: 37.0ms (26.3% of total)

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

ival-sub: 14.0ms (10% of total)

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

backward-pass: 8.0ms (5.7% of total)

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

const: 0.0ms (0% of total)

bsearch130.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
44.0ms	8.348099927409018e-14	1.3180771414385235e-12
77.0ms	-3.0700670841695414	-3.073254769711707e-13

Results

79.0ms	131×	1	valid
29.0ms	125×	0	valid

Compiler

Compiled 768 to 568 computations (26% saved)

Precisions

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

ival-cos: 36.0ms (41.8% of total)

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

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

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

backward-pass: 4.0ms (4.6% of total)

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

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

const: 0.0ms (0% of total)

bsearch127.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
57.0ms	5.992714656427075e-5	0.02097943045518972
62.0ms	-1.9690662667647984e-9	-9.279227529578495e-12

Results

78.0ms	117×	1	valid
32.0ms	123×	0	valid

Compiler

Compiled 722 to 534 computations (26% saved)

Precisions

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

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

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

ival-acos: 15.0ms (16.2% of total)

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

backward-pass: 4.0ms (4.3% of total)

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

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

const: 0.0ms (0% of total)

bsearch161.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
75.0ms	1.994207233499716e-27	2.0137283128526044e-13
78.0ms	-0.0025574627385317114	-1.5327822478705777e-12

Results

125.0ms	228×	1	valid
16.0ms	76×	0	valid

Compiler

Compiled 876 to 650 computations (25.8% saved)

Precisions

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

ival-cos: 45.0ms (40.3% of total)

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

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

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

backward-pass: 7.0ms (6.3% of total)

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

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

const: 0.0ms (0% of total)

bsearch62.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
58.0ms	0.10049453169848248	80.27599293066088

Results

43.0ms	80×	1	valid
10.0ms	48×	0	valid

Compiler

Compiled 472 to 360 computations (23.7% saved)

Precisions

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

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

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

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

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

backward-pass: 3.0ms (7% of total)

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

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

const: 0.0ms (0% of total)

bsearch168.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
86.0ms	1.994207233499716e-27	2.0137283128526044e-13
70.0ms	-1.5327822478705777e-12	-5.689898821692796e-18

Results

133.0ms	250×	1	valid
12.0ms	54×	0	valid

Compiler

Compiled 775 to 567 computations (26.8% saved)

Precisions

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

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

ival-sin: 34.0ms (29.2% of total)

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

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

backward-pass: 8.0ms (6.9% of total)

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

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

const: 0.0ms (0% of total)

bsearch76.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
72.0ms	-0.0025574627385317114	-1.5327822478705777e-12

Results

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

Compiler

Compiled 320 to 240 computations (25% saved)

Precisions

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

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

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

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

ival-acos: 7.0ms (14.1% of total)

backward-pass: 4.0ms (8.1% of total)

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

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

const: 0.0ms (0% of total)

bsearch70.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
67.0ms	0.10049453169848248	80.27599293066088

Results

53.0ms	81×	1	valid
9.0ms	47×	0	valid

Compiler

Compiled 272 to 208 computations (23.5% saved)

Precisions

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

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

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

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

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

backward-pass: 3.0ms (5.8% of total)

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

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

const: 0.0ms (0% of total)

bsearch76.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
72.0ms	-1.5327822478705777e-12	-5.689898821692796e-18

Results

61.0ms	118×	1	valid
6.0ms	26×	0	valid

Compiler

Compiled 284 to 222 computations (21.8% saved)

Precisions

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

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

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

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

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

backward-pass: 4.0ms (7.4% of total)

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

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

const: 0.0ms (0% of total)

bsearch75.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
70.0ms	-0.0025574627385317114	-1.5327822478705777e-12

Results

60.0ms	117×	1	valid
6.0ms	27×	0	valid

Compiler

Compiled 284 to 222 computations (21.8% saved)

Precisions

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

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

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

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

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

backward-pass: 4.0ms (8% of total)

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

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

const: 0.0ms (0% of total)

bsearch89.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
66.0ms	1.0539530736779343e-20	2.6256723584128016e-17

Results

38.0ms	72×	1	valid
24.0ms	56×	0	valid

Compiler

Compiled 256 to 200 computations (21.9% saved)

Precisions

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

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

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

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

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

backward-pass: 2.0ms (4.6% of total)

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

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

const: 0.0ms (0% of total)

bsearch69.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
66.0ms	5.992714656427075e-5	0.02097943045518972

Results

47.0ms	59×	1	valid
15.0ms	69×	0	valid

Compiler

Compiled 232 to 184 computations (20.7% saved)

Precisions

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

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

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

backward-pass: 10.0ms (19.2% of total)

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

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

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

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

const: 0.0ms (0% of total)

bsearch0.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9986390414724824	0.9994152698144071

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch0.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-70.4914092918343	-3.0700670841695414

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch135.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
64.0ms	-7.927291525733577e-169	-1.627920412844381e-172
63.0ms	-1741.844330726708	-3.0700670841695414

Results

79.0ms	137×	1	valid
35.0ms	116×	0	valid
4.0ms	3×	2	valid

Compiler

Compiled 384 to 296 computations (22.9% saved)

Precisions

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

ival-cos: 35.0ms (36.8% of total)

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

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

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

backward-pass: 7.0ms (7.4% of total)

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

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

const: 0.0ms (0% of total)

bsearch64.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
61.0ms	-1741.844330726708	-3.0700670841695414

Results

28.0ms	53×	1	valid
17.0ms	75×	0	valid

Compiler

Compiled 208 to 160 computations (23.1% saved)

Precisions

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

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

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

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

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

backward-pass: 2.0ms (5.6% of total)

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

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

const: 0.0ms (0% of total)

simplify74.0ms (0.3%)

Algorithm

1×	egg-herbie

Rules

622×	`distribute-lft-neg-in_binary64`
354×	`neg-mul-1_binary64`
304×	`cancel-sign-sub_binary64`
296×	`neg-sub0_binary64`
222×	`sub-neg_binary64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	187	788
1	269	788
2	298	787
3	332	787
4	368	787
5	397	787
6	461	787
7	575	787
8	761	787
9	964	787
10	1246	787
11	1524	787
12	1750	787
13	1816	787

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (-.f64 lambda2 lambda1) R))
(if (<=.f64 phi1 #s(literal -2011652563838743/38685626227668133590597632 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi1 #s(literal -7350268983256945/38685626227668133590597632 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi1 #s(literal 8715097876569077/79228162514264337593543950336 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi1 #s(literal -6189700196426901/77371252455336267181195264 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi1 #s(literal -851083777008699/38685626227668133590597632 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 lambda1 #s(literal -7791904696734915/1180591620717411303424 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R) (if (<=.f64 lambda1 #s(literal 6437288204283977/4951760157141521099596496896 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)))
(if (<=.f64 lambda2 #s(literal -4593918114535591/2417851639229258349412352 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R) (if (<=.f64 lambda2 #s(literal 6640827866535439/18446744073709551616 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -4722366482869645/147573952589676412928 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)))
(if (<=.f64 phi2 #s(literal 8286623314361713/36028797018963968 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)))
(if (<=.f64 phi1 #s(literal -940834429856889/618970019642690137449562112 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 phi1 (sin.f64 phi2)))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -519460313115661/1180591620717411303424 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R))
(if (<=.f64 phi2 #s(literal 7349874591868649/72057594037927936 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R))
(if (<=.f64 phi1 #s(literal -4951760157141521/4951760157141521099596496896 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R))
(if (<=.f64 phi1 #s(literal -4382356096103031/75557863725914323419136 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R))
(if (<=.f64 lambda2 #s(literal 8437482395119095/324518553658426726783156020576256 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R))
(if (<=.f64 lambda2 #s(literal 8416326983629983/2305843009213693952 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 8998192055486251/9007199254740992 binary64)) (.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 (PI.f64) #s(literal 2 binary64)))) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (.f64 (-.f64 lambda2 lambda1) R))
(if (<=.f64 lambda1 #s(literal -6980579422424269/2251799813685248 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (if (<=.f64 lambda1 #s(literal -6118709677249157/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (.f64 (-.f64 lambda2 lambda1) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R)))
(if (<=.f64 lambda1 #s(literal -6980579422424269/2251799813685248 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (-.f64 lambda2 lambda1) R))
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 lambda1 R)

Outputs
(if (<=.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (-.f64 lambda2 lambda1) R))
(if (<=.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 R (-.f64 lambda2 lambda1)))
(if (<=.f64 phi1 #s(literal -2011652563838743/38685626227668133590597632 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi1 #s(literal -2011652563838743/38685626227668133590597632 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (-.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(if (<=.f64 phi1 #s(literal -7350268983256945/38685626227668133590597632 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi1 #s(literal 8715097876569077/79228162514264337593543950336 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R))))
(if (<=.f64 phi1 #s(literal -7350268983256945/38685626227668133590597632 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (if (<=.f64 phi1 #s(literal 8715097876569077/79228162514264337593543950336 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (+.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (-.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(if (<=.f64 phi1 #s(literal -6189700196426901/77371252455336267181195264 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi1 #s(literal -6189700196426901/77371252455336267181195264 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(if (<=.f64 phi1 #s(literal -851083777008699/38685626227668133590597632 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi1 #s(literal -851083777008699/38685626227668133590597632 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(if (<=.f64 lambda1 #s(literal -7791904696734915/1180591620717411303424 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R) (if (<=.f64 lambda1 #s(literal 6437288204283977/4951760157141521099596496896 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2))))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)))
(if (<=.f64 lambda1 #s(literal -7791904696734915/1180591620717411303424 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) (if (<=.f64 lambda1 #s(literal 6437288204283977/4951760157141521099596496896 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))
(if (<=.f64 lambda2 #s(literal -4593918114535591/2417851639229258349412352 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R) (if (<=.f64 lambda2 #s(literal 6640827866535439/18446744073709551616 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)))
(if (<=.f64 lambda2 #s(literal -4593918114535591/2417851639229258349412352 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (if (<=.f64 lambda2 #s(literal 6640827866535439/18446744073709551616 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))
(if (<=.f64 phi1 #s(literal -4722366482869645/147573952589676412928 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -4722366482869645/147573952589676412928 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi2 #s(literal 8286623314361713/36028797018963968 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)))
(if (<=.f64 phi2 #s(literal 8286623314361713/36028797018963968 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(if (<=.f64 phi1 #s(literal -940834429856889/618970019642690137449562112 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 phi1 (sin.f64 phi2)))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)))
(if (<=.f64 phi1 #s(literal -940834429856889/618970019642690137449562112 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (if (<=.f64 phi1 #s(literal 3961408125713217/19807040628566084398385987584 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 phi1 (sin.f64 phi2))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi1 #s(literal -519460313115661/1180591620717411303424 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R))
(if (<=.f64 phi1 #s(literal -519460313115661/1180591620717411303424 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 phi2 #s(literal 7349874591868649/72057594037927936 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R))
(if (<=.f64 phi2 #s(literal 7349874591868649/72057594037927936 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(if (<=.f64 phi1 #s(literal -4951760157141521/4951760157141521099596496896 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))) R))
(if (<=.f64 phi1 #s(literal -4951760157141521/4951760157141521099596496896 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(if (<=.f64 phi1 #s(literal -4382356096103031/75557863725914323419136 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1))) R))
(if (<=.f64 phi1 #s(literal -4382356096103031/75557863725914323419136 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda1)))))
(if (<=.f64 lambda2 #s(literal 8437482395119095/324518553658426726783156020576256 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R))
(if (<=.f64 lambda2 #s(literal 8437482395119095/324518553658426726783156020576256 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2)))))
(if (<=.f64 lambda2 #s(literal 8416326983629983/2305843009213693952 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R))
(if (<=.f64 lambda2 #s(literal 8416326983629983/2305843009213693952 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (*.f64 R (acos.f64 (cos.f64 lambda2))))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 8998192055486251/9007199254740992 binary64)) (.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 (PI.f64) #s(literal 2 binary64)))) R))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 8998192055486251/9007199254740992 binary64)) (.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 R (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (*.f64 (PI.f64) #s(literal 2 binary64))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (.f64 (-.f64 lambda2 lambda1) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -50 binary64)) (.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 R (-.f64 lambda2 lambda1)))
(if (<=.f64 lambda1 #s(literal -6980579422424269/2251799813685248 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (if (<=.f64 lambda1 #s(literal -6118709677249157/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (.f64 (-.f64 lambda2 lambda1) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R)))
(if (<=.f64 lambda1 #s(literal -6980579422424269/2251799813685248 binary64)) (.f64 R (acos.f64 (cos.f64 lambda1))) (if (<=.f64 lambda1 #s(literal -6118709677249157/8498207885068273579033411304839498037273489883632510771191106211206456957773635883826600036243668570702229271779944016245545269402443315830552319660265397631101300333366291504507650048 binary64)) (.f64 R (-.f64 lambda2 lambda1)) (*.f64 R (acos.f64 (cos.f64 lambda2)))))
(if (<=.f64 lambda1 #s(literal -6980579422424269/2251799813685248 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (-.f64 lambda2 lambda1) R))
(if (<=.f64 lambda1 #s(literal -6980579422424269/2251799813685248 binary64)) (.f64 R (acos.f64 (cos.f64 lambda1))) (.f64 R (-.f64 lambda2 lambda1)))
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 R (-.f64 lambda2 lambda1))
(*.f64 lambda1 R)

soundness3.2s (13.5%)

Rules

6156×	`-lowering-.f32`
6156×	`-lowering-.f64`
5462×	`-lowering-.f32`
5462×	`-lowering-.f64`
5302×	`-lowering-.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	474	12442
1	1681	12037
2	6141	12009
0	8348	12009
0	481	12293
1	1640	12071
2	6263	12070
0	8325	12070
0	54	256
1	340	194
2	3173	194
0	8137	194
0	63	292
1	372	285
2	3639	282
0	8114	282
0	183	3081
1	611	3032
2	2189	3004
3	4006	3001
0	8109	3001
0	17	58
1	72	58
2	597	58
0	8394	58
0	58	281
1	333	216
2	3024	216
0	8163	216
0	549	15213
1	1894	14331
2	7242	14323
0	8544	14323

Stop Event

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

Compiler

Compiled 2641 to 1527 computations (42.2% saved)

preprocess199.0ms (0.8%)

Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 2328 to 768 computations (67% saved)

Iter	Nodes	Cost
0	17	89
1	27	89
2	43	89
3	56	89
4	67	89
5	100	89
6	159	89
7	247	89
8	332	89
9	439	89
10	517	89
11	523	89
0	523	89

Iter	Nodes	Cost
0	17	89
1	27	89
2	43	89
3	56	89
4	67	89
5	100	89
6	159	89
7	247	89
8	332	89
9	439	89
10	517	89
11	523	89
0	523	89

analyze1.1s (4.6%)

sample5.1s (21.3%)

preprocess97.0ms (0.4%)

explain514.0ms (2.2%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify19.0ms (0.1%)

localize221.0ms (0.9%)

series30.0ms (0.1%)

rewrite629.0ms (2.6%)

simplify267.0ms (1.1%)

eval65.0ms (0.3%)

prune74.0ms (0.3%)

simplify222.0ms (0.9%)

localize580.0ms (2.4%)

series118.0ms (0.5%)

rewrite306.0ms (1.3%)

simplify365.0ms (1.5%)

eval179.0ms (0.8%)

prune194.0ms (0.8%)

simplify159.0ms (0.7%)

localize999.0ms (4.2%)

series56.0ms (0.2%)

rewrite386.0ms (1.6%)

simplify436.0ms (1.8%)

eval294.0ms (1.2%)

prune374.0ms (1.6%)

simplify175.0ms (0.7%)

localize1.4s (6%)

series83.0ms (0.3%)

rewrite348.0ms (1.5%)

simplify407.0ms (1.7%)

eval151.0ms (0.6%)

prune306.0ms (1.3%)

regimes957.0ms (4%)

regimes481.0ms (2%)

regimes56.0ms (0.2%)

regimes72.0ms (0.3%)

regimes71.0ms (0.3%)

regimes233.0ms (1%)

regimes111.0ms (0.5%)

regimes98.0ms (0.4%)

regimes61.0ms (0.3%)

regimes147.0ms (0.6%)

regimes38.0ms (0.2%)

regimes48.0ms (0.2%)

regimes30.0ms (0.1%)

regimes36.0ms (0.2%)

regimes72.0ms (0.3%)

regimes29.0ms (0.1%)

regimes52.0ms (0.2%)

regimes11.0ms (0%)

regimes21.0ms (0.1%)

regimes8.0ms (0%)

regimes17.0ms (0.1%)

regimes9.0ms (0%)

bsearch3.0ms (0%)

bsearch166.0ms (0.7%)

bsearch213.0ms (0.9%)

bsearch170.0ms (0.7%)

bsearch190.0ms (0.8%)

bsearch130.0ms (0.5%)

bsearch127.0ms (0.5%)

bsearch161.0ms (0.7%)

bsearch62.0ms (0.3%)

bsearch168.0ms (0.7%)

bsearch76.0ms (0.3%)

bsearch70.0ms (0.3%)

bsearch76.0ms (0.3%)

bsearch75.0ms (0.3%)

bsearch89.0ms (0.4%)

bsearch69.0ms (0.3%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

bsearch135.0ms (0.6%)

bsearch64.0ms (0.3%)

simplify74.0ms (0.3%)

soundness3.2s (13.5%)

preprocess199.0ms (0.8%)

end0.0ms (0%)

Iter	Nodes	Cost
0	17	89
1	27	89
2	43	89
3	56	89
4	67	89
5	100	89
6	159	89
7	247	89
8	332	89
9	439	89
10	517	89
11	523	89
0	523	89