Metrics for Spherical law of cosines

analyze1.3s (5.5%)

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: 662.0ms

ival-cos: 239.0ms (36.1% of total)

ival-mult: 183.0ms (27.6% of total)

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

ival-acos: 37.0ms (5.6% of total)

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

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

const: 3.0ms (0.5% of total)

backward-pass: 1.0ms (0.2% of total)

sample5.0s (20.9%)

Results

3.9s	6274×	1	valid
533.0ms	1964×	0	valid
45.0ms	18×	2	valid

Precisions

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

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

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

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

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

backward-pass: 153.0ms (4% of total)

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

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

const: 9.0ms (0.2% of total)

Bogosity

preprocess98.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)

explain443.0ms (1.9%)

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
63	138	(5.453571404851678e+220 -6.995056906913047e-216 4.415873287573582e+305 -1.6059817143393558e-184 8.329739515278799e-185)	-	`(cos.f64 (-.f64 lambda1 lambda2))`
22	1	(2.649605813136173e+39 -1.597970258021474e-42 1.3982871082388795e-270 2.8168037766408722e-157 0.029230786203136284)	-	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`
1	0	-	-	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
0	0	-	-	`(cos.f64 phi1)`
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	-	-	`(sin.f64 phi2)`
0	0	-	-	`phi1`
0	0	-	-	`(*.f64 (sin.f64 phi1) (sin.f64 phi2))`
0	0	-	-	`(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))`
0	0	-	-	`lambda1`
0	0	-	-	`(cos.f64 phi2)`
0	0	-	-	`(sin.f64 phi1)`
0	0	-	-	`R`
0	0	-	-	`(-.f64 lambda1 lambda2)`
0	0	-	-	`(*.f64 (cos.f64 phi1) (cos.f64 phi2))`
0	0	-	-	`phi2`
0	0	-	-	`lambda2`

Results

289.0ms	418×	1	valid
27.0ms	92×	0	valid
9.0ms	2×	2	valid

Compiler

Compiled 220 to 53 computations (75.9% saved)

Precisions

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

ival-cos: 92.0ms (37.1% of total)

ival-sin: 73.0ms (29.5% of total)

ival-mult: 29.0ms (11.7% of total)

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

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

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

ival-sub: 5.0ms (2% 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
▶	75.6%	(.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)

simplify18.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

localize185.0ms (0.8%)

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	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	99.7%	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
✓	accuracy	93.0%	(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.5%	(cos.f64 (-.f64 lambda1 lambda2))

Results

144.0ms	209×	1	valid
12.0ms	46×	0	valid
4.0ms	1×	2	valid

Compiler

Compiled 98 to 18 computations (81.6% saved)

Precisions

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

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

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

ival-mult: 17.0ms (14.8% of total)

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

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

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

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

const: 0.0ms (0% of total)

series34.0ms (0.1%)

Counts

6 → 252

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))>
#<alt (* (* (cos phi1) (cos phi2)) (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)))>
#<alt (* (cos phi2) (cos (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))>
#<alt (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (cos (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))>
#<alt (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))>
#<alt (+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))>
#<alt (+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))>
#<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)))))>
#<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)))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))>
#<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 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))>
#<alt (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))>

Calls

63 calls:

Time	Variable		Point	Expression
5.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))))

rewrite312.0ms (1.3%)

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	68
1	72	68
2	593	68
0	8337	68

Stop Event

1×	iter limit
1×	node limit

Counts

6 → 209

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

simplify497.0ms (2.1%)

Algorithm

1×	egg-herbie

Rules

3060×	`-lowering-.f32`
3060×	`-lowering-.f64`
2156×	`+-lowering-+.f64`
2156×	`+-lowering-+.f32`
2010×	`sum3-define`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	219	3819
1	745	3731
2	2803	3663
3	4697	3657
0	8177	3657

Stop Event

1×	iter limit
1×	node limit

Counts

252 → 252

Calls

Call 1

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

eval56.0ms (0.2%)

Compiler: Compiled 14959 to 1430 computations (90.4% saved)

prune81.0ms (0.3%)

Pruning

35 alts after pruning (35 fresh and 0 done)

	Pruned	Kept	Total
New	426	35	461
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	427	35	462

Accuracy

94.7%

Counts

462 → 35

Alt Table

Click to see full alt table

Status	Accuracy	Program
	75.3%	(/.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	75.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
	75.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	75.3%	(.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) R)
	75.4%	(.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) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	75.3%	(.f64 (/.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))) R)
	75.4%	(.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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	75.5%	(.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 lambda1 lambda2))))))) R)
	75.7%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	75.4%	(.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	51.7%	(.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)
▶	75.2%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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))))))))) R)
	75.4%	(.f64 (acos.f64 (/.f64 #s(literal 1 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 lambda1 lambda2)))))))) R)
	58.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
	58.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)
	94.3%	(.f64 (acos.f64 (+.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)))))) R)
	94.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (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 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (sin.f64 lambda1) (.f64 (sin.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R)
	94.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (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)))))))) R)
	53.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
	75.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1 binary64)) (.f64 (cos.f64 (+.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
▶	75.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
	94.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi1))))) R)
▶	94.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	94.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 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))))))) R)
	94.3%	(.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)
	45.3%	(.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 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))))))) R)
▶	47.5%	(.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)
	52.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	54.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
	43.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	44.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	37.0%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
	34.9%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	43.6%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
▶	44.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)

Compiler

Compiled 2752 to 1580 computations (42.6% saved)

simplify164.0ms (0.7%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

4036×	`-lowering-.f32`
4036×	`-lowering-.f64`
1716×	`sum3-define`
1668×	`sum4-define`
1110×	`associate-r`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	61	729
1	148	719
2	402	697
3	1302	697
4	4551	697
0	8191	697

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize1.1s (4.6%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.5%	(acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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)))))))))
✓	accuracy	99.5%	(pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
✓	accuracy	87.9%	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi2))))
✓	accuracy	87.5%	(-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) phi1))))
✓	accuracy	99.9%	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
✓	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 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))) R)
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	98.3%	(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))))))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.5%	(cos.f64 (-.f64 lambda1 lambda2))
✓	accuracy	99.5%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))
✓	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.5%	(cos.f64 (-.f64 lambda2 lambda1))
✓	accuracy	95.0%	(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
✓	accuracy	99.8%	(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.5%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))

Results

318.0ms	125×	1	valid
297.0ms	15×	5	exit
108.0ms	95×	0	invalid
92.0ms	1×	2	invalid
63.0ms	16×	0	valid
6.0ms	3×	1	invalid
4.0ms	1×	2	valid

Compiler

Compiled 756 to 61 computations (91.9% saved)

Precisions

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

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

ival-sin: 223.0ms (30.4% of total)

ival-mult: 83.0ms (11.3% of total)

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

backward-pass: 29.0ms (4% of total)

ival-pow: 26.0ms (3.5% of total)

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

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

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

compiled-spec: 10.0ms (1.4% of total)

const: 1.0ms (0.1% of total)

series212.0ms (0.9%)

Counts

26 → 1092

Calls

Call 1

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

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

Calls

273 calls:

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

rewrite386.0ms (1.6%)

Algorithm

1×	batch-egg-rewrite

Rules

3728×	`-lowering-.f32`
3728×	`-lowering-.f64`
1568×	`pow-lowering-pow.f64`
1568×	`pow-lowering-pow.f32`
1390×	`/-lowering-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	61	352
1	373	310
2	3718	310
0	8675	310

Stop Event

1×	iter limit
1×	node limit

Counts

26 → 696

Calls

Call 1

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

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

simplify586.0ms (2.5%)

Algorithm

1×	egg-herbie

Rules

6514×	`-lowering-.f32`
6514×	`-lowering-.f64`
4840×	`+-lowering-+.f64`
4840×	`+-lowering-+.f32`
1194×	`distribute-lft-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1048	30744
1	3729	30303
0	8532	30303

Stop Event

1×	iter limit
1×	node limit

Counts

1092 → 1092

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

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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (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 #s(literal -1/2 binary64) (.f64 (.f64 phi1 (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 (sin.f64 phi2) (.f64 phi1 (+.f64 (.f64 (.f64 #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 phi1 (sin.f64 phi2)) #s(literal -1/6 binary64)))))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (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 #s(literal -1/2 binary64) (.f64 (.f64 phi2 (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 (sin.f64 phi1) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.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 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda1) lambda2) (.f64 (cos.f64 phi1) (cos.f64 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))))
(+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.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 lambda1) #s(literal -1/2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.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))))
(+ (* -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 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (.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 (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 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 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #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 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 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.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))))
(.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 #s(literal 1/24 binary64) (*.f64 phi2 phi2))))))
(+ (* (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 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 #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 phi2 phi2) (.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (+.f64 (.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) #s(literal 1/24 binary64)))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (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 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (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 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda1) lambda2) (*.f64 (cos.f64 phi1) (cos.f64 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))))
(+.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 lambda1) #s(literal -1/2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (* (cos phi1) (cos phi2))))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi1) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 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 (- 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 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (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 (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (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 phi1 phi1) (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi1 phi1) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64))))))) (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 (- 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 (cos.f64 phi1)) (sin.f64 lambda1)))
(+ (* 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 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 phi1) (cos.f64 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))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)) (.f64 lambda2 (+.f64 (.f64 (cos.f64 phi1) (sin.f64 lambda1)) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 lambda1)) (.f64 (.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)))))))))
(* (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 (*.f64 lambda1 (cos.f64 phi1)) (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 #s(literal -1/2 binary64) lambda1) (.f64 (cos.f64 phi1) (cos.f64 lambda2))))))
(+ (* 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 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi1) (sin.f64 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 (* -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 #s(literal -1/2 binary64) (.f64 phi1 phi1)))
(+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64)))) #s(literal -1/2 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 phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (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 (-.f64 lambda1 lambda2)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 phi1 (+.f64 (.f64 (.f64 phi1 (sin.f64 phi2)) #s(literal -1/6 binary64)) (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 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) (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 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (+ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.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 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda1) lambda2) (.f64 (cos.f64 phi1) (cos.f64 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))))
(+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.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 lambda1) #s(literal -1/2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* (cos phi1) (* (cos phi2) (cos (neg lambda2))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))) (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))) (.f64 (*.f64 (cos.f64 phi1) (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)))))
(+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 lambda1 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))))))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (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 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (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 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda1) lambda2) (*.f64 (cos.f64 phi1) (cos.f64 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))))
(+.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 lambda1) #s(literal -1/2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))))
(+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2))))))
(+ (* (cos phi1) (cos (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/24 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) #s(literal 1/24 binary64)))))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))))
(* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 phi1 (+.f64 (.f64 (.f64 phi1 (sin.f64 phi2)) #s(literal -1/6 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.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)))
(+ (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (+.f64 (.f64 lambda1 lambda2) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (* (cos phi1) (cos phi2))))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 lambda2 (.f64 #s(literal -1/2 binary64) lambda1)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi1) (cos phi2))) (* -1/6 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))))) (* lambda2 (* (cos phi1) (cos phi2))))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 lambda1 (+.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))))
(+ (* (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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(+ (* lambda2 (* (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 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(+ (* lambda2 (* (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 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(.f64 (.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (+ (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2) (/ (* (sin phi1) (sin phi2)) lambda2))))
(.f64 lambda2 (+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2))) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (+ (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2) (/ (* (sin phi1) (sin phi2)) lambda2))))
(.f64 lambda2 (+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2))) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (+ (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2) (/ (* (sin phi1) (sin phi2)) lambda2))))
(.f64 lambda2 (+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2))) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(.f64 (.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
(* -1 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (/.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))
(* -1 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (/.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))
(* -1 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (/.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))
(* 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 (sin.f64 phi2) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (sin.f64 phi2) #s(literal -1/6 binary64)) (.f64 (.f64 phi1 phi1) (.f64 (sin.f64 phi2) (+.f64 (.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)) #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 (sin.f64 phi1) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (sin.f64 phi1) #s(literal -1/6 binary64)) (.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 (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(* R (acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(acos (/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2)))))
(acos.f64 (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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)))))
(* (cos phi1) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* phi2 (sin phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))))))) (* -1 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (-.f64 (.f64 (/.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (cos.f64 phi1)) (/.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) (sin.f64 phi1))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1 (/ (* (sin phi1) (- (+ (* -1 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos phi1) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))))))) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/2 (sin phi1)) (* 1/6 (sin phi1)))))) (+ (* -1 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ (cos (* 2 phi1)) (* (cos phi1) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (pow (sin phi1) 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))))))) (* -1 (sin phi1)))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (+.f64 (.f64 phi2 (-.f64 (-.f64 (-.f64 (.f64 (/.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (cos.f64 phi1)) (/.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi2 (-.f64 (.f64 (sin.f64 phi1) #s(literal -1/3 binary64)) (/.f64 (.f64 (sin.f64 phi1) (-.f64 (-.f64 (.f64 (/.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) (cos.f64 phi1)) (/.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))) (sin.f64 phi1))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(* (cos phi2) (cos (- lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* phi1 (sin phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (/ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (* -1 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (sin.f64 phi2))))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1 (/ (* (sin phi2) (- (+ (* -1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos phi2) (cos (- lambda1 lambda2)))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (/ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (sin phi2)) (* 1/6 (sin phi2)))))) (+ (* -1 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (/ (cos (* 2 phi2)) (* (cos phi2) (cos (- lambda1 lambda2))))))) (+ (* -1 (/ (pow (sin phi2) 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* -1/2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/2 (/ 1 (* (cos phi2) (cos (- lambda1 lambda2))))))))) (* -1 (sin phi2)))) (* (cos phi2) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (-.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 phi1 (-.f64 (.f64 (sin.f64 phi2) #s(literal -1/3 binary64)) (/.f64 (.f64 (sin.f64 phi2) (-.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (sin.f64 phi2) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) (sin.f64 phi2))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(- (+ (* lambda1 (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (/ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
(+.f64 (.f64 lambda1 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (/ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
(+.f64 (.f64 lambda1 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (+.f64 (.f64 lambda1 (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ (* lambda1 (- (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* lambda1 (- (+ (* lambda1 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2)))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* 1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (* -1/2 (/ (* (cos phi1) (* (cos phi2) (* (cos (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))))) (* -1 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) 2))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))) (/ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))
(+.f64 (.f64 lambda1 (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (+.f64 (.f64 lambda1 (+.f64 (.f64 lambda1 (-.f64 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 4/3 binary64) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (-.f64 (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (/.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
(- (+ (* lambda2 (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(+.f64 (.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (* lambda2 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(+.f64 (.f64 lambda2 (+.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (.f64 lambda2 (-.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(- (+ (* lambda2 (- (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (* lambda2 (- (+ (* lambda2 (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* -1/6 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (* (cos phi2) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))))) (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))) (pow (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) 2)))) (/ (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))) (/ (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(+.f64 (.f64 lambda2 (+.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (-.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) #s(literal -4/3 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (-.f64 (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (/.f64 (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))) (pow.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))))
(/.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #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))))
(/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* -1 (/ (* phi2 (sin phi1)) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (/ 1 (* (cos phi1) (cos (- lambda1 lambda2)))))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (*.f64 phi2 (sin.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(+ (* phi2 (+ (* -1 (/ (sin phi1) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* phi2 (- (+ (* 1/2 (/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ 1 (* (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3))))) (* 1/2 (/ (cos (* 2 phi1)) (* (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3)))))))) (/ 1 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))))) (/.f64 (/.f64 (sin.f64 phi1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))
(+ (* phi2 (+ (* -1 (/ (sin phi1) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* phi2 (- (+ (* 1/2 (/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ 1 (* (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3)))) (* phi2 (- (* 1/6 (/ (sin phi1) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* -1 (/ (* (sin phi1) (- (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/2 (cos (* 2 phi1)))) 1/2)) (* (pow (cos phi1) 4) (pow (cos (- lambda1 lambda2)) 4)))))))) (* 1/2 (/ (cos (* 2 phi1)) (* (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3)))))))) (/ 1 (* (cos phi1) (cos (- lambda1 lambda2)))))
(+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (.f64 phi2 (+.f64 (/.f64 (.f64 (sin.f64 phi1) #s(literal 1/6 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (/.f64 (sin.f64 phi1) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (/.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 3 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))))) (/.f64 (/.f64 (sin.f64 phi1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ 1 (* (cos phi2) (cos (- lambda1 lambda2))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* -1 (/ (* phi1 (sin phi2)) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (/ 1 (* (cos phi2) (cos (- lambda1 lambda2)))))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (*.f64 phi1 (sin.f64 phi2)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(+ (* phi1 (+ (* -1 (/ (sin phi2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* phi1 (- (+ (* 1/2 (/ 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/2 (/ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3))))) (* 1/2 (/ (cos (* 2 phi2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))))) (/ 1 (* (cos phi2) (cos (- lambda1 lambda2)))))
(+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))) (*.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))))) (/.f64 (/.f64 (sin.f64 phi2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))
(+ (* phi1 (+ (* -1 (/ (sin phi2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* phi1 (- (+ (* 1/2 (/ 1 (* (cos phi2) (cos (- lambda1 lambda2))))) (+ (* 1/2 (/ 1 (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))) (* phi1 (- (* 1/6 (/ (sin phi2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* -1 (/ (* (sin phi2) (- (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/2 (cos (* 2 phi2)))) 1/2)) (* (pow (cos phi2) 4) (pow (cos (- lambda1 lambda2)) 4)))))))) (* 1/2 (/ (cos (* 2 phi2)) (* (pow (cos phi2) 3) (pow (cos (- lambda1 lambda2)) 3)))))))) (/ 1 (* (cos phi2) (cos (- lambda1 lambda2)))))
(+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (+.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64))))) (.f64 phi1 (+.f64 (/.f64 (.f64 (sin.f64 phi2) #s(literal 1/6 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (/.f64 (sin.f64 phi2) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 4 binary64))) (/.f64 (+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 4 binary64))))))) (/.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))) (.f64 (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 3 binary64)))))) (/.f64 (/.f64 (sin.f64 phi2) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(- (+ (* lambda1 (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (sin phi1) (sin phi2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+.f64 (.f64 lambda1 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* lambda1 (- (* -1/2 (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (sin phi1) (sin phi2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+.f64 (.f64 lambda1 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 (.f64 lambda1 (-.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))))) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(- (+ (* lambda1 (- (+ (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* lambda1 (- (+ (* -1/2 (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* lambda1 (- (* 1/6 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* -1/2 (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2)))) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))))) (+ (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* -1 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2)))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))) (* -2 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (* (sin (neg lambda2)) (- (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (sin phi1) (sin phi2)) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+.f64 (.f64 lambda1 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 (.f64 lambda1 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (-.f64 (.f64 lambda1 (-.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (neg.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (.f64 #s(literal 4/3 binary64) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (pow.f64 (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))))) (/.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(- (+ (* lambda2 (- (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (sin phi1) (sin phi2)) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+.f64 (.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))) (/.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (sin phi1) (sin phi2)) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(- (+ (* lambda2 (- (+ (* lambda2 (- (+ (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* lambda2 (- (* -1/6 (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (* -1/2 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (+ (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1)))) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))))))) (+ (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2)))))))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (* 2 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (sin lambda1) (- (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))))) (pow (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))) 2))))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))) (/ (* (sin phi1) (sin phi2)) (- (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2))))))))
(+.f64 (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (/.f64 (.f64 (.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (-.f64 (.f64 lambda2 (-.f64 (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (.f64 (.f64 (cos.f64 lambda1) (sin.f64 lambda1)) #s(literal -4/3 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))))))) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 (cos.f64 lambda1) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))))) (/.f64 (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))) (pow.f64 (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi2 #s(literal 2 binary64)))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(/ (- (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))) (* (sin phi1) (sin phi2))) (- (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2))) (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (- 1/2 (* 1/2 (cos (* 2 phi2)))))))
(/.f64 (-.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 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (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 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64))))))))
(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 (.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)) (sin.f64 lambda1))))
(+ (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 (.f64 lambda2 (+.f64 (.f64 #s(literal 1/6 binary64) (.f64 lambda2 (-.f64 #s(literal 0 binary64) (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda1) #s(literal -1/2 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 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.f64 lambda2))))
(+ (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 (.f64 #s(literal -1/6 binary64) (.f64 lambda1 (sin.f64 lambda2))) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))) (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 (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 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))) (sin.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 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (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 (.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2)) (sin.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 lambda2 (+.f64 (.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (sin.f64 lambda1)))) (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))
(* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))
(+ (* -1/2 (* (pow phi1 2) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* 1/24 (* (pow phi1 2) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (+.f64 (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))))
(+ (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))) (* (pow phi1 2) (+ (* -1/2 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))) (* 1/24 (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1))))))))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (+.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))
(.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))
(+ (* -1/2 (* (pow phi2 2) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+ (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* 1/24 (* (pow phi2 2) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2))))))
(+ (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))) (* (pow phi2 2) (+ (* -1/2 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1)))))) (* 1/24 (* (cos phi1) (+ (cos lambda1) (* lambda2 (sin lambda1))))))))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 phi2 phi2)) #s(literal 1/24 binary64)))))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi1) (cos.f64 phi2))
(+ (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(.f64 (+.f64 (.f64 lambda1 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi1) (cos phi2)))) (* lambda2 (* (cos phi1) (cos phi2))))) (* (cos phi1) (cos phi2)))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda1)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi1) (cos phi2))) (* -1/6 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))))) (* lambda2 (* (cos phi1) (cos phi2))))) (* (cos phi1) (cos phi2)))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 lambda1 (+.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (*.f64 lambda2 (cos.f64 phi1)) (cos.f64 phi2))))))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (cos phi1) (* (cos phi2) (+ (cos lambda1) (* lambda2 (sin lambda1)))))
(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(* (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 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(+ (* 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 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(+ (* 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 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(.f64 (.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))
(.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))) lambda2)))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))
(.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))) lambda2)))
(* lambda2 (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))
(.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))) lambda2)))
(* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))
(.f64 (.f64 lambda2 (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
(* -1 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 0 binary64) (sin.f64 lambda1))) (/.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 0 binary64) (sin.f64 lambda1))) (/.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* -1 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 #s(literal 0 binary64) (sin.f64 lambda1))) (/.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/3 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 2/45 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/315 binary64)))) #s(literal -1/3 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi1 #s(literal 2 binary64)))))
(pow phi2 2)
(*.f64 phi2 phi2)
(* (pow phi2 2) (+ 1 (* -1/3 (pow phi2 2))))
(.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/3 binary64))))
(* (pow phi2 2) (+ 1 (* (pow phi2 2) (- (* 2/45 (pow phi2 2)) 1/3))))
(.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 2/45 binary64)) #s(literal -1/3 binary64)))))
(* (pow phi2 2) (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 2/45 (* -1/315 (pow phi2 2)))) 1/3))))
(.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) (+.f64 #s(literal 2/45 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/315 binary64)))) #s(literal -1/3 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi2))))
(+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (cos.f64 (.f64 phi2 #s(literal 2 binary64)))))
(* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))
(*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(+ (* -1 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))
(+.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/3 binary64) (*.f64 phi2 phi2))))))
(+ (* (pow phi2 2) (+ (* -1 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi2 2) (+ (* -2/45 (* (pow phi2 2) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/3 (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))
(+.f64 (.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 phi2 phi2) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal -2/45 binary64) (.f64 phi2 phi2)) #s(literal 1/3 binary64))))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))
(*.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(+ (* -1 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* 1/3 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(+.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 (.f64 #s(literal 1/3 binary64) (*.f64 phi1 phi1)) #s(literal -1 binary64)))))
(+ (* (pow phi1 2) (+ (* -1 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))) (* (pow phi1 2) (+ (* -2/45 (* (pow phi1 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))) (* 1/3 (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2))))))) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(+.f64 (.f64 (+.f64 (.f64 #s(literal -1 binary64) (.f64 phi1 phi1)) #s(literal 1 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))) (.f64 (.f64 phi1 phi1) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))) (+.f64 #s(literal 1/3 binary64) (.f64 #s(literal -2/45 binary64) (.f64 phi1 phi1)))))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))
(+ (* -2 (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
(+.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 (.f64 #s(literal -2 binary64) lambda1) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))))
(+ (* lambda1 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
(+.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (.f64 lambda1 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64)))))))))
(+ (* lambda1 (+ (* -2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2)))))) (* lambda1 (+ (* lambda1 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* 1/3 (* (cos (neg lambda2)) (sin (neg lambda2)))) (* (cos (neg lambda2)) (sin (neg lambda2))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos (neg lambda2)) 2)) (pow (sin (neg lambda2)) 2)))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg lambda2)) 2))))
(+.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))) (.f64 lambda1 (+.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2))))) (.f64 lambda1 (+.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda2) #s(literal 2 binary64))))) (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 #s(literal 4/3 binary64) (*.f64 (cos.f64 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)))))))))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (neg (+ lambda2 (* -1 lambda1)))) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2)))
(.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))
(+ (* 2 (* lambda2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (cos.f64 lambda1) lambda2) (.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1)))))
(+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (.f64 lambda2 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64))))))))
(+ (* lambda2 (+ (* 2 (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1))))) (* lambda2 (+ (* lambda2 (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (* (cos lambda1) (sin lambda1))) (* -1/3 (* (cos lambda1) (sin lambda1))))))) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (+ (* -1 (pow (cos lambda1) 2)) (pow (sin lambda1) 2)))))))) (* (pow (cos lambda1) 2) (* (pow (cos phi1) 2) (pow (cos phi2) 2))))
(+.f64 (.f64 (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (cos.f64 lambda1)) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (sin.f64 lambda1))) (.f64 lambda2 (+.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)) (pow.f64 (cos.f64 lambda1) #s(literal 2 binary64)))) (.f64 lambda2 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda1)) #s(literal -4/3 binary64)))))))))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (- lambda1 lambda2)) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (cos (+ lambda1 (* -1 lambda2))) 2)))
(.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))

eval325.0ms (1.4%)

Compiler: Compiled 86200 to 4857 computations (94.4% saved)

prune235.0ms (1%)

Pruning

56 alts after pruning (54 fresh and 2 done)

	Pruned	Kept	Total
New	2040	37	2077
Fresh	13	17	30
Picked	3	2	5
Done	0	0	0
Total	2056	56	2112

Accuracy

94.8%

Counts

2112 → 56

Alt Table

Click to see full alt table

Status	Accuracy	Program
	75.3%	(/.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	75.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
	75.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	44.2%	(.f64 (/.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)))))) R)
	75.3%	(.f64 (/.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) #s(literal 2 binary64))))) R)
	75.4%	(.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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	75.5%	(.f64 (-.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)))))) R)
	47.4%	(.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) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))) R)
	44.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
▶	75.2%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	75.7%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	75.4%	(.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	33.0%	(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))) R)
	52.1%	(.f64 (acos.f64 (/.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) 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 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	43.4%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	44.3%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	43.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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 phi2 phi2)))))) R)
	88.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 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))))))))) R)
	58.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)
	94.3%	(.f64 (acos.f64 (+.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)))))) R)
	45.4%	(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.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 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda1) lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))))) R)
▶	94.3%	(.f64 (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	94.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
	94.0%	(.f64 (acos.f64 (+.f64 (.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) 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) lambda1)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda2)))))) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (-.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	53.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
	75.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 phi2))))) R)
	43.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (cos.f64 phi2)))))) R)
	94.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 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))))))) R)
	45.3%	(.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 lambda2 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))))))))) R)
✓	47.5%	(.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)
	52.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	54.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
	52.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	52.6%	(.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)
	43.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	52.5%	(.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)
	44.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
	47.1%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.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))) lambda2))))) R)
	37.0%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
	45.2%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
▶	34.9%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	19.5%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	12.3%	(.f64 (acos.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) R)
	53.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	43.6%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	52.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	43.1%	(.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) 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) lambda2)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) lambda1)))))) (cos.f64 (+.f64 lambda2 lambda1))))) R)
	44.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	52.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	26.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
✓	44.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	30.1%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
	33.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
▶	47.1%	(.f64 (acos.f64 (.f64 lambda2 (+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2))) (/.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)))) R)
▶	28.5%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)

Compiler

Compiled 3608 to 2256 computations (37.5% saved)

simplify155.0ms (0.6%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

2158×	`-lowering-.f32`
2158×	`-lowering-.f64`
1978×	`fnmadd-define`
1412×	`fma-lowering-fma.f32`
1412×	`fma-lowering-fma.f64`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	59	620
1	131	607
2	318	587
3	809	587
4	1740	568
5	2575	568
6	6542	568
0	8002	568

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize643.0ms (2.7%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.9%	(/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)
✓	accuracy	99.9%	(*.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2))
✓	accuracy	99.9%	(.f64 lambda2 (+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2))) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2)))
✓	accuracy	93.1%	(acos.f64 (.f64 lambda2 (+.f64 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2))) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) lambda2))))
✓	accuracy	99.9%	(cos.f64 (-.f64 lambda2 lambda1))
✓	accuracy	99.8%	(acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))
✓	accuracy	94.0%	(-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
✓	accuracy	31.9%	(PI.f64)
✓	accuracy	99.9%	(*.f64 phi2 (sin.f64 phi1))
✓	accuracy	99.9%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
✓	accuracy	99.9%	(cos.f64 (-.f64 lambda2 lambda1))
✓	accuracy	94.2%	(acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
✓	accuracy	100.0%	(-.f64 lambda1 lambda2)
✓	accuracy	99.9%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
✓	accuracy	99.9%	(cos.f64 (-.f64 lambda1 lambda2))
✓	accuracy	89.8%	(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
✓	accuracy	99.9%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.9%	(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
✓	accuracy	99.9%	(.f64 (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
✓	accuracy	94.2%	(acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))

Results

175.0ms	68×	1	valid
155.0ms	52×	1	invalid
109.0ms	127×	0	invalid
31.0ms	5×	2	valid
16.0ms	1×	2	invalid
3.0ms	3×	0	valid

Compiler

Compiled 657 to 60 computations (90.9% saved)

Precisions

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

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

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

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

ival-acos: 41.0ms (11.6% of total)

backward-pass: 27.0ms (7.6% of total)

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

ival-div: 10.0ms (2.8% of total)

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

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

const: 1.0ms (0.3% of total)

series164.0ms (0.7%)

Counts

26 → 1056

Calls

Call 1

Inputs
#<alt (* (acos (+ (* (* (cos phi1) (cos phi2)) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))) R)>
#<alt (acos (+ (* (* (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))))>
#<alt (* (acos (cos (- lambda1 lambda2))) R)>
#<alt (acos (cos (- lambda1 lambda2)))>
#<alt (cos (- lambda1 lambda2))>
#<alt (- lambda1 lambda2)>
#<alt (* (acos (+ (* phi2 (sin phi1)) (* (+ 1 (* -1/2 (* phi2 phi2))) (* (cos phi1) (cos (- lambda2 lambda1)))))) R)>
#<alt (acos (+ (* phi2 (sin phi1)) (* (+ 1 (* -1/2 (* phi2 phi2))) (* (cos phi1) (cos (- lambda2 lambda1))))))>
#<alt (+ (* phi2 (sin phi1)) (* (+ 1 (* -1/2 (* phi2 phi2))) (* (cos phi1) (cos (- lambda2 lambda1)))))>
#<alt (* phi2 (sin phi1))>
#<alt (* (- (PI) (acos (/ -1 (/ 1 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda2 lambda1)))))))) R)>
#<alt (- (PI) (acos (/ -1 (/ 1 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda2 lambda1))))))))>
#<alt (acos (/ -1 (/ 1 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda2 lambda1)))))))>
#<alt (/ -1 (/ 1 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda2 lambda1))))))>
#<alt (* (acos (* lambda2 (+ (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (sin phi1) (/ (sin phi2) lambda2))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))) R)>
#<alt (acos (* lambda2 (+ (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (sin phi1) (/ (sin phi2) lambda2))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2))))>
#<alt (* lambda2 (+ (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (sin phi1) (/ (sin phi2) lambda2))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))>
#<alt (+ (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (sin phi1) (/ (sin phi2) lambda2))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2))>
#<alt (* (sin lambda1) (sin lambda2))>
#<alt (* (sin phi1) (sin phi2))>
#<alt (cos (- lambda2 lambda1))>
#<alt (PI)>
#<alt (* (sin phi1) (/ (sin phi2) lambda2))>
#<alt (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)>

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

Calls

264 calls:

Time	Variable		Point	Expression
38.0ms	lambda1	@	0	(/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)
19.0ms	lambda1	@	inf	(* lambda2 (+ (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (sin phi1) (/ (sin phi2) lambda2))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))
13.0ms	lambda2	@	inf	(* (- (PI) (acos (/ -1 (/ 1 (+ (* (sin phi1) (sin phi2)) (* (* (cos phi1) (cos phi2)) (cos (- lambda2 lambda1)))))))) R)
4.0ms	lambda1	@	-inf	(* (acos (* lambda2 (+ (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (sin phi1) (/ (sin phi2) lambda2))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))) R)
2.0ms	phi1	@	inf	(* lambda2 (+ (+ (* (cos phi1) (* (cos phi2) (sin lambda1))) (* (sin phi1) (/ (sin phi2) lambda2))) (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) lambda2)))

rewrite409.0ms (1.7%)

Algorithm

1×	batch-egg-rewrite

Rules

3630×	`-lowering-.f32`
3630×	`-lowering-.f64`
2256×	`pow-lowering-pow.f64`
2256×	`pow-lowering-pow.f32`
1732×	`/-lowering-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	59	362
1	338	351
2	3216	351
0	8305	351

Stop Event

1×	iter limit
1×	node limit

Counts

26 → 509

Calls

Call 1

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

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

simplify457.0ms (1.9%)

Algorithm

1×	egg-herbie

Rules

5438×	`+-lowering-+.f64`
5438×	`+-lowering-+.f32`
4718×	`-lowering-.f32`
4718×	`-lowering-.f64`
1100×	`distribute-lft-in`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	732	20208
1	2810	19959
2	7083	19577
0	8279	19577

Stop Event

1×	iter limit
1×	node limit

Counts

1056 → 1056

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

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

eval225.0ms (0.9%)

Compiler: Compiled 50316 to 3728 computations (92.6% saved)

prune262.0ms (1.1%)

Pruning

89 alts after pruning (85 fresh and 4 done)

	Pruned	Kept	Total
New	1611	46	1657
Fresh	10	39	49
Picked	3	2	5
Done	0	2	2
Total	1624	89	1713

Accuracy

98.1%

Counts

1713 → 89

Alt Table

Click to see full alt table

Status	Accuracy	Program
	75.3%	(/.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	75.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
	75.2%	(/.f64 (.f64 (-.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (pow.f64 (acos.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))))))) #s(literal 3 binary64))) R) (+.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (acos.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 (PI.f64) (acos.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)))))))))))
	75.3%	(/.f64 (.f64 (-.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (acos.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))))))) #s(literal 2 binary64))) R) (+.f64 (PI.f64) (acos.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)))))))))
	9.4%	(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
	75.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	75.1%	(+.f64 (.f64 (PI.f64) R) (.f64 (-.f64 #s(literal 0 binary64) (acos.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)))))))) R))
	73.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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	73.4%	(.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 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	44.2%	(.f64 (/.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)))))) R)
	9.8%	(.f64 (/.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
	7.8%	(.f64 (/.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))))) R)
	7.8%	(.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 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) R)
▶	72.6%	(.f64 (-.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	75.4%	(.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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	75.3%	(.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (PI.f64) (acos.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 (pow.f64 (acos.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))))))) #s(literal 2 binary64)) (+.f64 (PI.f64) (acos.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)))))))))) R)
	75.5%	(.f64 (-.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)))))) R)
	47.4%	(.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) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))) R)
	44.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	73.3%	(.f64 (-.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	75.2%	(.f64 (-.f64 (PI.f64) (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (neg.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)
	73.2%	(.f64 (-.f64 (PI.f64) (/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (neg.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))) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	75.4%	(.f64 (-.f64 (PI.f64) (-.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 (-.f64 lambda1 lambda2))))))))) R)
	93.7%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.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)
	33.5%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))))) R)
	54.2%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1 binary64) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	51.8%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
	43.4%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	44.2%	(.f64 (-.f64 (PI.f64) (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1 binary64) (cos.f64 phi1))))) R)
	10.7%	(*.f64 (-.f64 lambda2 lambda1) R)
	4.7%	(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
	7.8%	(.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)
	9.8%	(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
	21.8%	(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
	75.7%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	32.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	75.4%	(.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	32.2%	(.f64 (acos.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)))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	33.0%	(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))) R)
	43.4%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	44.3%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	43.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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 phi2 phi2)))))) R)
	88.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 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))))))))) R)
	27.1%	(.f64 (acos.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))))) (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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))))) R)
	58.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)
▶	94.3%	(.f64 (acos.f64 (+.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)))))) R)
	45.3%	(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))) (.f64 lambda2 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))) R)
✓	94.3%	(.f64 (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	57.1%	(.f64 (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	94.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
	53.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
	75.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 phi2))))) R)
	94.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (.f64 (sin.f64 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))))))) R)
✓	47.5%	(.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)
	52.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	54.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
	52.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	52.6%	(.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)
	43.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	52.5%	(.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)
	44.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
	32.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	37.0%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
	24.9%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 lambda1))))) R)
	19.5%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	12.3%	(.f64 (acos.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) R)
	9.2%	(.f64 (acos.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	19.6%	(.f64 (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal 1/2 binary64))))) R)
	53.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	43.6%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	44.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
▶	52.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	26.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
✓	44.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	30.1%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
▶	33.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
	29.7%	(.f64 (acos.f64 (.f64 lambda2 (+.f64 (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) lambda2))))) R)
	17.8%	(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
	11.3%	(.f64 (acos.f64 (cos.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 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)))))))) R)
	11.0%	(.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)
	14.1%	(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))) R)
✓	28.5%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
	10.7%	(.f64 (acos.f64 (cos.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)
	22.3%	(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
	18.1%	(*.f64 (acos.f64 (cos.f64 lambda2)) R)
	19.5%	(*.f64 (acos.f64 (cos.f64 lambda1)) R)
▶	4.6%	(*.f64 lambda1 R)

Compiler

Compiled 5337 to 3299 computations (38.2% saved)

simplify178.0ms (0.7%)

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

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

Rules

2008×	`sum5-define`
2004×	`fma-define`
1852×	`fma-lowering-fma.f32`
1852×	`fma-lowering-fma.f64`
1756×	`-lowering-.f32`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	49	453
1	100	416
2	217	416
3	449	416
4	639	412
5	781	412
6	1104	412
7	1753	412
8	4536	412
0	8367	412

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize691.0ms (2.9%)

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	accuracy	98.4%	(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
✓	accuracy	98.4%	(sqrt.f64 (PI.f64))
✓	accuracy	92.5%	(-.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
✓	accuracy	78.5%	(cos.f64 (-.f64 lambda2 lambda1))
✓	accuracy	99.8%	(.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
✓	accuracy	99.7%	(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
✓	accuracy	99.6%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
✓	accuracy	88.4%	(acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
✓	accuracy	100.0%	(cos.f64 phi1)
✓	accuracy	99.9%	(*.f64 (cos.f64 phi1) (cos.f64 lambda1))
✓	accuracy	99.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
✓	accuracy	77.6%	(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))
✓	accuracy	100.0%	(*.f64 lambda1 R)
✓	accuracy	99.7%	(*.f64 (sin.f64 lambda1) (sin.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 (cos.f64 lambda1) (cos.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
✓	accuracy	93.0%	(acos.f64 (+.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))))))

Results

512.0ms	208×	1	valid
54.0ms	11×	2	valid
29.0ms	37×	0	valid

Compiler

Compiled 479 to 50 computations (89.6% saved)

Precisions

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

ival-sin: 133.0ms (30.1% of total)

ival-cos: 116.0ms (26.3% of total)

ival-mult: 61.0ms (13.8% of total)

backward-pass: 51.0ms (11.5% of total)

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

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

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

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

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

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

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

const: 1.0ms (0.2% of total)

series56.0ms (0.2%)

Counts

21 → 696

Calls

Call 1

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

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

Calls

174 calls:

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

rewrite400.0ms (1.7%)

Algorithm

1×	batch-egg-rewrite

Rules

4078×	`-lowering-.f32`
4078×	`-lowering-.f64`
2028×	`fma-lowering-fma.f32`
2028×	`fma-lowering-fma.f64`
1838×	`/-lowering-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	49	235
1	246	193
2	2099	193
0	8354	193

Stop Event

1×	iter limit
1×	node limit

Counts

21 → 515

Calls

Call 1

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

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

simplify427.0ms (1.8%)

Algorithm

1×	egg-herbie

Rules

5430×	`-lowering-.f32`
5430×	`-lowering-.f64`
2562×	`+-lowering-+.f64`
2562×	`+-lowering-+.f32`
1536×	`sum3-define`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	403	11807
1	1458	11624
2	5703	11607
0	8301	11607

Stop Event

1×	iter limit
1×	node limit

Counts

696 → 696

Calls

Call 1

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

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

eval193.0ms (0.8%)

Compiler: Compiled 47274 to 3504 computations (92.6% saved)

prune303.0ms (1.3%)

Pruning

91 alts after pruning (83 fresh and 8 done)

	Pruned	Kept	Total
New	1278	17	1295
Fresh	14	66	80
Picked	1	4	5
Done	0	4	4
Total	1293	91	1384

Accuracy

98.1%

Counts

1384 → 91

Alt Table

Click to see full alt table

Status	Accuracy	Program
	74.0%	(fma.f64 (PI.f64) R (.f64 (-.f64 #s(literal 0 binary64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))) R))
	75.3%	(/.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	75.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 phi2) (.f64 (cos.f64 phi1) (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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))
	75.1%	(/.f64 (.f64 (-.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) (pow.f64 (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 3 binary64))) R) (+.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))) (+.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))))
	75.3%	(/.f64 (.f64 (-.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64))) R) (+.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
	9.4%	(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
	75.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) R))
	75.1%	(+.f64 (.f64 (PI.f64) R) (.f64 (-.f64 #s(literal 0 binary64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))) R))
	31.4%	(.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 lambda1))))) R)
	9.8%	(.f64 (/.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (+.f64 lambda1 lambda2)) R)
	7.8%	(.f64 (/.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))))) R)
	7.8%	(.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 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) R)
	42.9%	(.f64 (-.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	75.4%	(.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 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))))) (/.f64 (pow.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))))) R)
	75.2%	(.f64 (-.f64 (/.f64 (.f64 (PI.f64) (PI.f64)) (+.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))) (/.f64 (pow.f64 (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 2 binary64)) (+.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))) R)
	75.5%	(.f64 (-.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)))))) R)
	47.4%	(.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) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))))) R)
	44.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	33.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) R)
	73.3%	(.f64 (-.f64 (cbrt.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))))))) R)
	75.2%	(.f64 (-.f64 (PI.f64) (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (neg.f64 (neg.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)
	73.2%	(.f64 (-.f64 (PI.f64) (/.f64 (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (pow.f64 (neg.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))) (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	75.4%	(.f64 (-.f64 (PI.f64) (-.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 (-.f64 lambda1 lambda2))))))))) R)
	93.7%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.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)
	33.5%	(.f64 (-.f64 (PI.f64) (acos.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))))))))) R)
	54.2%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 #s(literal -1 binary64) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	51.8%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
	43.4%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	44.2%	(.f64 (-.f64 (PI.f64) (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1 binary64) (cos.f64 phi1))))) R)
	10.7%	(*.f64 (-.f64 lambda2 lambda1) R)
	4.7%	(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
	7.8%	(.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)
	9.8%	(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
	21.8%	(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
	75.7%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	32.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	75.4%	(.f64 (acos.f64 (/.f64 (-.f64 (pow.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	52.2%	(.f64 (acos.f64 (/.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)))))) R)
	32.2%	(.f64 (acos.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)))))) (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	43.4%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	44.3%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	88.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))) (-.f64 (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 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))))))))) R)
	27.1%	(.f64 (acos.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))))) (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) lambda1)))) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda1 lambda2))))) R)
	93.7%	(.f64 (acos.f64 (+.f64 (/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 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 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	58.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)
	93.6%	(.f64 (acos.f64 (+.f64 (/.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) (.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) 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) (.f64 (cos.f64 lambda1) (cos.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 (cos.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
✓	94.3%	(.f64 (acos.f64 (+.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)))))) R)
	45.3%	(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 lambda1)))) (.f64 lambda2 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)))))))) R)
✓	94.3%	(.f64 (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	57.1%	(.f64 (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 lambda2 (sin.f64 lambda1)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	94.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
	53.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
	75.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 phi2))))) R)
✓	47.5%	(.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)
	52.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	54.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
	52.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	52.6%	(.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)
	43.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	52.5%	(.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)
	44.6%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) R)
	32.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) R)
	37.0%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
	53.1%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	52.5%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (cos.f64 phi1))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	24.9%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 lambda1))))) R)
	10.5%	(.f64 (acos.f64 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (cos.f64 phi1))) R)
	19.5%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	12.3%	(.f64 (acos.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) R)
	9.2%	(.f64 (acos.f64 (.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	19.6%	(.f64 (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal 1/2 binary64))))) R)
	53.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	43.6%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	44.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
✓	52.2%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	26.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
✓	44.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	30.1%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
✓	33.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
	29.7%	(.f64 (acos.f64 (.f64 lambda2 (+.f64 (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) lambda2))))) R)
	17.8%	(*.f64 (acos.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
	14.1%	(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))) R)
✓	28.5%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
	10.7%	(.f64 (acos.f64 (cos.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)
	22.3%	(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
	17.1%	(*.f64 (acos.f64 (cos.f64 phi1)) R)
	18.1%	(*.f64 (acos.f64 (cos.f64 lambda2)) R)
	19.5%	(*.f64 (acos.f64 (cos.f64 lambda1)) R)
✓	4.6%	(*.f64 lambda1 R)

Compiler

Compiled 6719 to 2460 computations (63.4% saved)

regimes469.0ms (2%)

Counts

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

Outputs

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

Calls

10 calls:

62.0ms	(-.f64 lambda1 lambda2)
43.0ms	lambda1
43.0ms	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
41.0ms	R
40.0ms	phi1

Results

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

Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes116.0ms (0.5%)

Counts

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

Outputs

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

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

Calls

3 calls:

35.0ms

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

31.0ms

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

28.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
97.6%	2	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
97.6%	2	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
97.6%	2	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`

Compiler

Compiled 67 to 48 computations (28.4% saved)

regimes327.0ms (1.4%)

Counts

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

Outputs

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

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

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

Calls

10 calls:

49.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)
37.0ms	R
33.0ms	phi2
28.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
27.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
78.4%	2	`lambda2`
83.7%	3	`phi2`
75.7%	1	`R`
85.2%	3	`phi1`
77.8%	2	`lambda1`
75.7%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
75.7%	1	`(-.f64 lambda1 lambda2)`
79.0%	2	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
79.0%	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)`
79.0%	2	`(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))`

Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes48.0ms (0.2%)

Counts

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

Outputs

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

Calls

1 calls:

26.0ms

phi1

Results

Accuracy	Segments	Branch
85.2%	3	`phi1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes39.0ms (0.2%)

Counts

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

Outputs

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

Calls

1 calls:

24.0ms

phi1

Results

Accuracy	Segments	Branch
85.2%	3	`phi1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes37.0ms (0.2%)

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

Outputs

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

Calls

1 calls:

21.0ms

phi1

Results

Accuracy	Segments	Branch
85.2%	3	`phi1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes32.0ms (0.1%)

Counts

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

Calls

1 calls:

22.0ms

phi1

Results

Accuracy	Segments	Branch
85.1%	3	`phi1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes28.0ms (0.1%)

Counts

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

Outputs

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

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

Calls

1 calls:

18.0ms

phi1

Results

Accuracy	Segments	Branch
85.1%	3	`phi1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes126.0ms (0.5%)

Counts

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

Outputs

(*.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 (*.f64 (cos.f64 phi1) (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)) (cos.f64 lambda2)))) R)

Calls

7 calls:

17.0ms	lambda2
17.0ms	lambda1
17.0ms	phi1
17.0ms	(-.f64 lambda1 lambda2)
17.0ms	phi2

Results

Accuracy	Segments	Branch
64.3%	3	`(cos.f64 (-.f64 lambda1 lambda2))`
63.8%	2	`(-.f64 lambda1 lambda2)`
60.8%	3	`R`
77.7%	3	`lambda1`
78.2%	3	`lambda2`
77.3%	4	`phi2`
76.3%	4	`phi1`

Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes58.0ms (0.2%)

Counts

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

Outputs

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

Calls

3 calls:

18.0ms	lambda1
16.0ms	phi2
15.0ms	lambda2

Results

Accuracy	Segments	Branch
75.4%	3	`phi2`
61.3%	2	`lambda1`
75.1%	4	`lambda2`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes43.0ms (0.2%)

Counts

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

Outputs

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

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

Calls

2 calls:

17.0ms	phi1
16.0ms	phi2

Results

Accuracy	Segments	Branch
72.2%	2	`phi1`
73.8%	3	`phi2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes54.0ms (0.2%)

Counts

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

Outputs

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

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

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

Calls

3 calls:

16.0ms	lambda2
15.0ms	phi2
15.0ms	phi1

Results

Accuracy	Segments	Branch
55.9%	3	`lambda2`
63.7%	2	`phi1`
68.3%	3	`phi2`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes100.0ms (0.4%)

Counts

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

Outputs

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
47.2%	2	`R`
47.6%	2	`lambda1`
53.5%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
59.1%	2	`phi1`
53.4%	2	`(-.f64 lambda1 lambda2)`
59.1%	2	`phi2`

Compiler

Compiled 41 to 33 computations (19.5% saved)

regimes33.0ms (0.1%)

Counts

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

Calls

2 calls:

14.0ms	phi2
13.0ms	phi1

Results

Accuracy	Segments	Branch
59.1%	2	`phi2`
59.0%	2	`phi1`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes33.0ms (0.1%)

Counts

44 → 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 lambda1)) (+.f64 lambda1 lambda2)) R)
(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) 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 (/.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))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) 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 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 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (cos.f64 phi1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal 1/2 binary64))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 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 (-.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 (acos.f64 (cos.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 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)))))))) 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 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1 binary64) (cos.f64 phi1))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) 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 (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(.f64 (acos.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) 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 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) 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 phi2)))) R)

Outputs

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

(*.f64 (acos.f64 (+.f64 (*.f64 phi2 (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2))) (*.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:

13.0ms	phi2
12.0ms	phi1

Results

Accuracy	Segments	Branch
58.6%	2	`phi1`
60.5%	3	`phi2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes16.0ms (0.1%)

Counts

43 → 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 lambda1)) (+.f64 lambda1 lambda2)) R)
(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) 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 (/.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))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) 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 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 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (cos.f64 phi1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal 1/2 binary64))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 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 (-.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 (acos.f64 (cos.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 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)))))))) 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 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1 binary64) (cos.f64 phi1))))) R)
(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) 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 (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) R)
(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi1))) #s(literal 2 binary64))) R)
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
(.f64 (acos.f64 (.f64 (.f64 lambda2 (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) 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 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 lambda1))))) R)
(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (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

1 calls:

12.0ms

phi2

Results

Accuracy	Segments	Branch
58.7%	2	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes70.0ms (0.3%)

Counts

27 → 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 lambda1)) (+.f64 lambda1 lambda2)) R)
(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) 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 (/.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))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) 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 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 (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)) #s(literal 1 binary64)) (cos.f64 phi1))) R)
(.f64 (acos.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal 1/2 binary64))))) R)
(.f64 (acos.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))))) R)
(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)) #s(literal -1/2 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 (-.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 (acos.f64 (cos.f64 (/.f64 (-.f64 (/.f64 (.f64 (PI.f64) (.f64 (PI.f64) (PI.f64))) #s(literal 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)))))))) 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 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)

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

Calls

7 calls:

13.0ms	phi1
12.0ms	lambda1
8.0ms	lambda2
8.0ms	R
8.0ms	phi2

Results

Accuracy	Segments	Branch
44.3%	1	`R`
44.3%	1	`lambda1`
44.3%	1	`(-.f64 lambda1 lambda2)`
44.3%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
44.3%	1	`lambda2`
44.3%	1	`phi1`
44.3%	1	`phi2`

Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes69.0ms (0.3%)

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

7 calls:

12.0ms	phi1
11.0ms	lambda1
8.0ms	phi2
8.0ms	(-.f64 lambda1 lambda2)
8.0ms	lambda2

Results

Accuracy	Segments	Branch
35.4%	2	`R`
33.3%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
44.1%	2	`lambda2`
44.3%	2	`lambda1`
35.2%	2	`phi2`
33.3%	1	`(-.f64 lambda1 lambda2)`
39.8%	2	`phi1`

Compiler

Compiled 47 to 38 computations (19.1% saved)

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

Calls

3 calls:

8.0ms	phi1
8.0ms	lambda1
8.0ms	lambda2

Results

Accuracy	Segments	Branch
39.8%	2	`phi1`
39.7%	2	`lambda2`
37.7%	2	`lambda1`

Compiler

Compiled 18 to 15 computations (16.7% saved)

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
33.2%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
33.2%	2	`(-.f64 lambda1 lambda2)`
28.5%	1	`phi2`
28.5%	1	`R`
28.5%	1	`lambda1`
28.5%	1	`lambda2`
33.2%	2	`phi1`

Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes26.0ms (0.1%)

Counts

13 → 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 lambda1)) (+.f64 lambda1 lambda2)) R)
(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) 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 (/.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))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)
(*.f64 (acos.f64 (cos.f64 phi1)) R)

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
28.4%	2	`lambda2`
31.1%	3	`lambda1`
22.1%	2	`R`
22.2%	2	`phi2`
26.3%	2	`phi1`

Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes6.0ms (0%)

Counts

12 → 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 lambda1)) (+.f64 lambda1 lambda2)) R)
(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) 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 (/.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))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)
(*.f64 (acos.f64 (cos.f64 lambda2)) R)

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

Calls

1 calls:

4.0ms

lambda1

Results

Accuracy	Segments	Branch
28.5%	2	`lambda1`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes16.0ms (0.1%)

Counts

11 → 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 lambda1)) (+.f64 lambda1 lambda2)) R)
(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) 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 (/.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))))) R)
(*.f64 (acos.f64 (cos.f64 lambda1)) R)

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

Calls

3 calls:

6.0ms	lambda1
4.0ms	lambda2
4.0ms	phi1

Results

Accuracy	Segments	Branch
19.5%	1	`phi1`
19.5%	1	`lambda2`
23.0%	2	`lambda1`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes21.0ms (0.1%)

Counts

10 → 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 lambda1)) (+.f64 lambda1 lambda2)) R)
(/.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) R) (+.f64 lambda1 lambda2))
(.f64 (.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) R)
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)))) 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 (/.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))))) R)

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes9.0ms (0%)

Counts

2 → 1

Calls

Call 1

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes9.0ms (0%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs
(*.f64 lambda1 R)

Outputs
(*.f64 lambda1 R)

Calls

5 calls:

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

Results

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

Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch2.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	0.0073133627232134695

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch1.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	0.0073133627232134695

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch185.0ms (0.8%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
87.0ms	1.0039176250016433e-86	1.4081179052028416e-73
88.0ms	-4.131403276249525	-2.2167812708627676e-26

Results

151.0ms	285×	1	valid
10.0ms	51×	0	valid

Compiler

Compiled 1166 to 843 computations (27.7% saved)

Precisions

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

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

ival-sin: 32.0ms (24.3% of total)

ival-mult: 19.0ms (14.5% of total)

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

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

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

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

const: 0.0ms (0% of total)

bsearch181.0ms (0.8%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
82.0ms	1.0039176250016433e-86	1.4081179052028416e-73
87.0ms	-4.131403276249525	-2.2167812708627676e-26

Results

145.0ms	280×	1	valid
11.0ms	56×	0	valid

Compiler

Compiled 1145 to 822 computations (28.2% saved)

Precisions

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

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

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

ival-mult: 19.0ms (14.8% of total)

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

backward-pass: 6.0ms (4.7% of total)

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

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

const: 0.0ms (0% of total)

bsearch188.0ms (0.8%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
85.0ms	1.0039176250016433e-86	1.4081179052028416e-73
91.0ms	-4.131403276249525	-2.2167812708627676e-26

Results

156.0ms	299×	1	valid
7.0ms	37×	0	valid

Compiler

Compiled 1019 to 738 computations (27.6% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch211.0ms (0.9%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
93.0ms	2.714088216188171e-16	74318.87329243416
101.0ms	-4.131403276249525	-2.2167812708627676e-26

Results

165.0ms	315×	1	valid
7.0ms	37×	0	valid

Compiler

Compiled 1077 to 783 computations (27.3% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch424.0ms (1.8%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
324.0ms	2.714088216188171e-16	74318.87329243416
88.0ms	-4.131403276249525	-2.2167812708627676e-26

Results

386.0ms	305×	1	valid
9.0ms	47×	0	valid

Compiler

Compiled 1110 to 816 computations (26.5% saved)

Precisions

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

backward-pass: 242.0ms (65.9% of total)

ival-cos: 52.0ms (14.2% of total)

ival-sin: 32.0ms (8.7% of total)

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

ival-acos: 13.0ms (3.5% of total)

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

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

const: 0.0ms (0% of total)

bsearch221.0ms (0.9%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
115.0ms	2.714088216188171e-16	74318.87329243416
97.0ms	-4.131403276249525	-2.2167812708627676e-26

Results

176.0ms	295×	1	valid
22.0ms	57×	0	valid

Compiler

Compiled 1088 to 794 computations (27% saved)

Precisions

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

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

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

ival-mult: 36.0ms (23.8% of total)

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

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

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

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

const: 0.0ms (0% of total)

bsearch223.0ms (0.9%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
79.0ms	3.628749800035247e-15	2.589217119985899e-6
135.0ms	-11361851.684071817	-7.9582678531645e-6

Results

166.0ms	163×	1	valid
36.0ms	141×	0	valid

Compiler

Compiled 906 to 670 computations (26% saved)

Precisions

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

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

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

ival-mult: 29.0ms (22.1% of total)

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

ival-acos: 9.0ms (6.8% of total)

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

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

const: 0.0ms (0% of total)

bsearch153.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
64.0ms	4.246008944130817e-7	0.0046493321737675316
81.0ms	-8.725655690225974e-9	-1.1565879606646108e-23

Results

115.0ms	216×	1	valid
18.0ms	72×	0	valid

Compiler

Compiled 860 to 636 computations (26% saved)

Precisions

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

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

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

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

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

backward-pass: 5.0ms (4.5% of total)

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

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

const: 0.0ms (0% of total)

bsearch198.0ms (0.8%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
89.0ms	4.246008944130817e-7	0.0046493321737675316
100.0ms	-8.725655690225974e-9	-1.1565879606646108e-23

Results

145.0ms	245×	1	valid
28.0ms	43×	0	valid

Compiler

Compiled 890 to 646 computations (27.4% saved)

Precisions

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

ival-mult: 49.0ms (36.8% of total)

ival-cos: 37.0ms (27.8% of total)

ival-sin: 24.0ms (18% of total)

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

backward-pass: 6.0ms (4.5% of total)

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

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

const: 0.0ms (0% of total)

bsearch209.0ms (0.9%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
114.0ms	4.246008944130817e-7	0.0046493321737675316
86.0ms	-8.725655690225974e-9	-1.1565879606646108e-23

Results

176.0ms	234×	1	valid
11.0ms	54×	0	valid

Compiler

Compiled 834 to 606 computations (27.3% saved)

Precisions

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

ival-cos: 68.0ms (43.8% of total)

ival-mult: 42.0ms (27% of total)

ival-sin: 24.0ms (15.4% of total)

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

backward-pass: 6.0ms (3.9% of total)

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

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

const: 0.0ms (0% of total)

bsearch97.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
92.0ms	-4.131403276249525	-2.2167812708627676e-26

Results

75.0ms	147×	1	valid
6.0ms	29×	0	valid

Compiler

Compiled 516 to 376 computations (27.1% saved)

Precisions

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

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

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

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

backward-pass: 6.0ms (9% of total)

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

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

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

const: 0.0ms (0% of total)

bsearch133.0ms (0.6%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
98.0ms	4.246008944130817e-7	0.0046493321737675316

Results

88.0ms	110×	1	valid
3.0ms	18×	0	valid

Compiler

Compiled 336 to 248 computations (26.2% saved)

Precisions

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

ival-acos: 42.0ms (51.7% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch165.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
71.0ms	4.246008944130817e-7	0.0046493321737675316
86.0ms	-38.09468983936711	-8.725655690225974e-9

Results

131.0ms	210×	1	valid
14.0ms	78×	0	valid

Compiler

Compiled 882 to 648 computations (26.5% saved)

Precisions

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

ival-cos: 46.0ms (40.4% of total)

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

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

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

ival-acos: 9.0ms (7.9% of total)

backward-pass: 5.0ms (4.4% of total)

ival-add: 3.0ms (2.6% 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
72.0ms	4.246008944130817e-7	0.0046493321737675316

Results

56.0ms	113×	1	valid
3.0ms	15×	0	valid

Compiler

Compiled 288 to 216 computations (25% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch59.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
56.0ms	-8115.858952031956	-170.86200600799583

Results

32.0ms	55×	1	valid
13.0ms	57×	0	valid

Compiler

Compiled 228 to 178 computations (21.9% saved)

Precisions

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

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

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

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

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

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

backward-pass: 1.0ms (2.7% of total)

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

const: 0.0ms (0% of total)

bsearch100.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
94.0ms	-4.131403276249525	-2.2167812708627676e-26

Results

77.0ms	136×	1	valid
11.0ms	40×	0	valid

Compiler

Compiled 329 to 255 computations (22.5% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch34.0ms (0.1%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.9943549754716454	0.9956807068588052

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch156.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
91.0ms	-4.933571457758569e-133	-2.5783763576672644e-146
58.0ms	-170.86200600799583	-4.352725545656691e-6

Results

95.0ms	150×	1	valid
43.0ms	154×	0	valid

Compiler

Compiled 450 to 366 computations (18.7% saved)

Precisions

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

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

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

ival-mult: 17.0ms (14.5% of total)

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

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

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

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

const: 0.0ms (0% of total)

bsearch154.0ms (0.6%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
149.0ms	-4.352725545656691e-6	-3.765819433374502e-19

Results

127.0ms	101×	1	valid
13.0ms	59×	0	valid

Compiler

Compiled 252 to 204 computations (19% saved)

Precisions

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

ival-cos: 65.0ms (50.5% of total)

ival-mult: 39.0ms (30.3% of total)

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch192.0ms (0.8%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
189.0ms	-170.86200600799583	-4.352725545656691e-6

Results

166.0ms	62×	1	valid
17.0ms	82×	0	valid

Compiler

Compiled 230 to 177 computations (23% saved)

Precisions

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

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

ival-acos: 54.0ms (31% of total)

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

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

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

backward-pass: 1.0ms (0.6% of total)

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

const: 0.0ms (0% of total)

simplify29.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

118×	`*-commutative_binary64`
44×	`+-commutative_binary64`
12×	`sub-neg_binary64`
10×	`neg-mul-1_binary64`
8×	`neg-sub0_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	217	978
1	300	978
2	311	978
3	321	978
4	326	978
5	329	978
6	330	978

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R))
(if (<=.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (.f64 (-.f64 lambda2 lambda1) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R))
(if (<=.f64 phi1 #s(literal -944473296573929/2361183241434822606848 binary64)) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)))
(if (<=.f64 phi1 #s(literal -6611313076017503/37778931862957161709568 binary64)) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (.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 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)))
(if (<=.f64 phi1 #s(literal -5440166188265831/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 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 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)))
(if (<=.f64 phi1 #s(literal -4951760157141521/1237940039285380274899124224 binary64)) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 2611279770367599/2417851639229258349412352 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 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -812247035053579/18889465931478580854784 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 phi2))))) R) (if (<=.f64 phi1 #s(literal 4332790137498831/154742504910672534362390528 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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -6346860552976803/302231454903657293676544 binary64)) (.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) (if (<=.f64 phi1 #s(literal 4835703278458517/604462909807314587353088 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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 lambda2 #s(literal -3246626956972881/36893488147419103232 binary64)) (.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 2833419889721787/1180591620717411303424 binary64)) (.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 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R) (if (<=.f64 phi2 #s(literal 7378697629483821/147573952589676412928 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.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)))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 (acos.f64 (.f64 lambda2 (+.f64 (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) lambda2))))) R) (if (<=.f64 phi2 #s(literal 6788401819125115/147573952589676412928 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.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)))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 (acos.f64 (.f64 lambda2 (+.f64 (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) lambda2))))) R) (if (<=.f64 phi2 #s(literal 112986307451471/1152921504606846976 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)))
(if (<=.f64 phi1 #s(literal -8618318831237103/1180591620717411303424 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R))
(if (<=.f64 phi2 #s(literal 7673845534663173/590295810358705651712 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.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 -5332261958806667/144115188075855872 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 4842270319348757/1152921504606846976 binary64)) (.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.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 2508757194024499/295147905179352825856 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))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(if (<=.f64 lambda1 #s(literal -175 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 phi1 #s(literal -3246626956972881/36893488147419103232 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 8962163258467287/9007199254740992 binary64)) (.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (.f64 (acos.f64 (cos.f64 phi1)) R))
(if (<=.f64 lambda1 #s(literal -1152921504606847/1152921504606846976 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (if (<=.f64 lambda1 #s(literal -6678075163775057/7029552803973744348141466418259346654483901747346744739219930582205996219799199797373501072037329464296751422864876398630012915711709843264075804970101818523648 binary64)) (.f64 (acos.f64 (cos.f64 phi1)) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R)))
(if (<=.f64 lambda1 #s(literal -5289050460814003/37778931862957161709568 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (acos.f64 (cos.f64 lambda2)) R))
(if (<=.f64 lambda1 #s(literal -4242751136953197/9223372036854775808 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (-.f64 lambda2 lambda1) R))
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 lambda1 R)

Outputs
(if (<=.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R))
(if (<=.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (.f64 (-.f64 lambda2 lambda1) R) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))
(if (<=.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (.f64 (-.f64 lambda2 lambda1) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R))
(if (<=.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 0 binary64)) (.f64 (-.f64 lambda2 lambda1) R) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))))
(if (<=.f64 phi1 #s(literal -944473296573929/2361183241434822606848 binary64)) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 #s(literal 1 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)))
(if (<=.f64 phi1 #s(literal -944473296573929/2361183241434822606848 binary64)) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(if (<=.f64 phi1 #s(literal -6611313076017503/37778931862957161709568 binary64)) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (.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 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)))
(if (<=.f64 phi1 #s(literal -6611313076017503/37778931862957161709568 binary64)) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (.f64 R (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 lambda2) (sin.f64 lambda1))))))) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(if (<=.f64 phi1 #s(literal -5440166188265831/604462909807314587353088 binary64)) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 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 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))) R)))
(if (<=.f64 phi1 #s(literal -5440166188265831/604462909807314587353088 binary64)) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi1 #s(literal 8912032396463377/63657374260452690195888927762793067532858387302060507832379389042324415617604272068231168 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(if (<=.f64 phi1 #s(literal -4951760157141521/1237940039285380274899124224 binary64)) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))))) R) (if (<=.f64 phi1 #s(literal 2611279770367599/2417851639229258349412352 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 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -4951760157141521/1237940039285380274899124224 binary64)) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))))) (if (<=.f64 phi1 #s(literal 2611279770367599/2417851639229258349412352 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -812247035053579/18889465931478580854784 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 phi2))))) R) (if (<=.f64 phi1 #s(literal 4332790137498831/154742504910672534362390528 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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -812247035053579/18889465931478580854784 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 phi2)))))) (if (<=.f64 phi1 #s(literal 4332790137498831/154742504910672534362390528 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -6346860552976803/302231454903657293676544 binary64)) (.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) (if (<=.f64 phi1 #s(literal 4835703278458517/604462909807314587353088 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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi1 #s(literal -6346860552976803/302231454903657293676544 binary64)) (.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) (if (<=.f64 phi1 #s(literal 4835703278458517/604462909807314587353088 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 lambda2 #s(literal -3246626956972881/36893488147419103232 binary64)) (.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 2833419889721787/1180591620717411303424 binary64)) (.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 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)))
(if (<=.f64 lambda2 #s(literal -3246626956972881/36893488147419103232 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (if (<=.f64 lambda2 #s(literal 2833419889721787/1180591620717411303424 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R) (if (<=.f64 phi2 #s(literal 7378697629483821/147573952589676412928 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.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)))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))) (if (<=.f64 phi2 #s(literal 7378697629483821/147573952589676412928 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 (acos.f64 (.f64 lambda2 (+.f64 (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) lambda2))))) R) (if (<=.f64 phi2 #s(literal 6788401819125115/147573952589676412928 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.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)))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 R (acos.f64 (.f64 lambda2 (+.f64 (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) lambda2)))))) (if (<=.f64 phi2 #s(literal 6788401819125115/147573952589676412928 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 (acos.f64 (.f64 lambda2 (+.f64 (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) lambda2))))) R) (if (<=.f64 phi2 #s(literal 112986307451471/1152921504606846976 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)))
(if (<=.f64 phi2 #s(literal -2568967366681087/302231454903657293676544 binary64)) (.f64 R (acos.f64 (.f64 lambda2 (+.f64 (.f64 (sin.f64 phi1) (/.f64 (sin.f64 phi2) lambda2)) (.f64 (cos.f64 phi1) (/.f64 (cos.f64 phi2) lambda2)))))) (if (<=.f64 phi2 #s(literal 112986307451471/1152921504606846976 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi1 #s(literal -8618318831237103/1180591620717411303424 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))) R))
(if (<=.f64 phi1 #s(literal -8618318831237103/1180591620717411303424 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.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) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi2 #s(literal 7673845534663173/590295810358705651712 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.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 7673845534663173/590295810358705651712 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.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 -5332261958806667/144115188075855872 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2)))) R) (if (<=.f64 phi2 #s(literal 4842270319348757/1152921504606846976 binary64)) (.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))) (.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 -5332261958806667/144115188075855872 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi2 #s(literal 4842270319348757/1152921504606846976 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) phi2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2))))))) (.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 phi2 #s(literal 2508757194024499/295147905179352825856 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 2508757194024499/295147905179352825856 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))))))
(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
(.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(if (<=.f64 lambda1 #s(literal -175 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 lambda1 #s(literal -175 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 phi1 #s(literal -3246626956972881/36893488147419103232 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R))
(if (<=.f64 phi1 #s(literal -3246626956972881/36893488147419103232 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (*.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 8962163258467287/9007199254740992 binary64)) (.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (.f64 (acos.f64 (cos.f64 phi1)) R))
(if (<=.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 8962163258467287/9007199254740992 binary64)) (.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 R (acos.f64 (cos.f64 phi1))))
(if (<=.f64 lambda1 #s(literal -1152921504606847/1152921504606846976 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (if (<=.f64 lambda1 #s(literal -6678075163775057/7029552803973744348141466418259346654483901747346744739219930582205996219799199797373501072037329464296751422864876398630012915711709843264075804970101818523648 binary64)) (.f64 (acos.f64 (cos.f64 phi1)) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R)))
(if (<=.f64 lambda1 #s(literal -1152921504606847/1152921504606846976 binary64)) (.f64 R (acos.f64 (cos.f64 lambda1))) (if (<=.f64 lambda1 #s(literal -6678075163775057/7029552803973744348141466418259346654483901747346744739219930582205996219799199797373501072037329464296751422864876398630012915711709843264075804970101818523648 binary64)) (.f64 R (acos.f64 (cos.f64 phi1))) (*.f64 R (acos.f64 (cos.f64 lambda2)))))
(if (<=.f64 lambda1 #s(literal -5289050460814003/37778931862957161709568 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (acos.f64 (cos.f64 lambda2)) R))
(if (<=.f64 lambda1 #s(literal -5289050460814003/37778931862957161709568 binary64)) (.f64 R (acos.f64 (cos.f64 lambda1))) (.f64 R (acos.f64 (cos.f64 lambda2))))
(if (<=.f64 lambda1 #s(literal -4242751136953197/9223372036854775808 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (-.f64 lambda2 lambda1) R))
(if (<=.f64 lambda1 #s(literal -4242751136953197/9223372036854775808 binary64)) (.f64 R (acos.f64 (cos.f64 lambda1))) (.f64 (-.f64 lambda2 lambda1) R))
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)
(*.f64 R (-.f64 #s(literal 0 binary64) lambda2))
(*.f64 lambda1 R)

soundness2.8s (11.8%)

Rules

6514×	`-lowering-.f32`
6514×	`-lowering-.f64`
5438×	`+-lowering-+.f64`
5438×	`+-lowering-+.f32`
5430×	`-lowering-.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	403	11807
1	1458	11624
2	5703	11607
0	8301	11607
0	219	3819
1	745	3731
2	2803	3663
3	4697	3657
0	8177	3657
0	732	20208
1	2810	19959
2	7083	19577
0	8279	19577
0	59	362
1	338	351
2	3216	351
0	8305	351
0	61	352
1	373	310
2	3718	310
0	8675	310
0	1048	30744
1	3729	30303
0	8532	30303
0	17	68
1	72	68
2	593	68
0	8337	68

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

Compiler

Compiled 2845 to 1561 computations (45.1% saved)

preprocess205.0ms (0.9%)

Remove

(sort phi1 phi2)

(negabs R)

Compiler

Compiled 3372 to 1204 computations (64.3% 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

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