Metrics for Spherical law of cosines

analyze1.1s (4.4%)

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

ival-mult: 218.0ms (35.3% of total)

ival-cos: 173.0ms (28% of total)

ival-sin: 127.0ms (20.6% of total)

ival-sub: 43.0ms (7% of total)

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

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

const: 3.0ms (0.5% of total)

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

sample5.4s (21.3%)

Results

4.3s	6243×	1	valid
559.0ms	1998×	0	valid
26.0ms	15×	2	valid

Precisions

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

ival-cos: 1.6s (40.5% of total)

ival-sin: 1.2s (29.9% of total)

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

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

backward-pass: 207.0ms (5.1% of total)

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

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

const: 9.0ms (0.2% of total)

Bogosity

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

explain500.0ms (2%)

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
53	133	(5.251959128739298e-184 -9.238731323746987e+265 -3.8128054197107843e-16 -1.5344575940840006e+194 -1.545010691135329e-221)	0	-	`(cos.f64 (-.f64 lambda1 lambda2))`
20	1	(1.4226925664526878e+174 4.735916996912336e-263 9.084341292288227e-170 -1.0556950372816577e+89 1.273393832640145e+46)	1	(1.1280462602260679e+87 -7.323503738736274e+263 -1.8013046685386626e+261 -3.567161270078705e+112 -4.9359371180895185e+42)	`(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	-	0	-	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
0	0	-	0	-	`(cos.f64 phi1)`
0	0	-	0	-	`(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)`
0	0	-	0	-	`(sin.f64 phi2)`
0	0	-	0	-	`phi1`
0	0	-	0	-	`(*.f64 (sin.f64 phi1) (sin.f64 phi2))`
0	0	-	0	-	`(.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))`
0	0	-	0	-	`lambda1`
0	0	-	0	-	`(cos.f64 phi2)`
0	0	-	0	-	`(sin.f64 phi1)`
0	0	-	0	-	`R`
0	0	-	0	-	`(-.f64 lambda1 lambda2)`
0	0	-	0	-	`(*.f64 (cos.f64 phi1) (cos.f64 phi2))`
0	0	-	0	-	`phi2`
0	0	-	0	-	`lambda2`

Results

358.0ms	384×	1	valid
51.0ms	126×	0	valid
3.0ms	2×	2	valid

Compiler

Compiled 220 to 53 computations (75.9% saved)

Precisions

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

ival-cos: 124.0ms (46.6% of total)

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

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

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

ival-add: 17.0ms (6.4% of total)

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

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

const: 1.0ms (0.4% of total)

eval0.0ms (0%)

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

prune1.0ms (0%)

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	78.9%	(.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)

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

localize213.0ms (0.8%)

Localize:

Found 4 expressions of interest:

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

Results

149.0ms	192×	1	valid
27.0ms	63×	0	valid
13.0ms	1×	2	valid

Compiler

Compiled 98 to 18 computations (81.6% saved)

Precisions

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

ival-sin: 40.0ms (33% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

series31.0ms (0.1%)

Counts

5 → 204

Calls

Call 1

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

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

Calls

51 calls:

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

rewrite257.0ms (1%)

Algorithm

1×	batch-egg-rewrite

Rules

3762×	`-lowering-.f32`
3762×	`-lowering-.f64`
2514×	`/-lowering-/.f32`
2514×	`/-lowering-/.f64`
2090×	`+-lowering-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	58
1	47	58
2	177	58
3	1149	58
0	8315	58

Stop Event

1×	iter limit
1×	node limit

Counts

5 → 177

Calls

Call 1

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

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

simplify209.0ms (0.8%)

Algorithm

1×	egg-herbie

Rules

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

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	183	3081
1	611	3032
2	2189	3004
3	3998	3001
0	8114	3001

Stop Event

1×	iter limit
1×	node limit

Counts

204 → 204

Calls

Call 1

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

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

eval45.0ms (0.2%)

Compiler: Compiled 9320 to 1068 computations (88.5% saved)

prune67.0ms (0.3%)

Pruning

32 alts after pruning (31 fresh and 1 done)

	Pruned	Kept	Total
New	350	31	381
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	350	32	382

Accuracy

94.2%

Counts

382 → 32

Alt Table

Click to see full alt table

Status	Accuracy	Program
	78.9%	(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
	78.7%	(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
	78.8%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
	78.3%	(.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	78.0%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) R)
	78.9%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
▶	93.7%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	93.7%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (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)
	78.9%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	78.9%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	72.3%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))) #s(literal 2 binary64)) (+.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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R)
▶	60.4%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.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 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R)
	60.5%	(.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
	60.4%	(.f64 (acos.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	78.9%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	93.7%	(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	93.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	93.7%	(.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)
▶	46.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) R)
	48.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))))) R)
	48.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 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (cos.f64 lambda1))) (.f64 (sin.f64 lambda1) (+.f64 (.f64 lambda2 (.f64 lambda2 #s(literal -1/6 binary64))) #s(literal 1 binary64))))))))) R)
	48.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 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 lambda1))))))))) R)
	50.1%	(.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)
✓	78.9%	(.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)
▶	55.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	56.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))) R)
	34.3%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi1 (sin.f64 phi2)))) R)
	39.1%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 phi2 (sin.f64 phi1)))) R)
	39.9%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2))))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	37.2%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	41.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
▶	45.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)

Compiler

Compiled 1848 to 1291 computations (30.1% saved)

simplify159.0ms (0.6%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

3948×	`-lowering-.f32`
3948×	`-lowering-.f64`
1440×	`sum3-define`
1436×	`sum5-define`
1396×	`sum4-define`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	61	676
1	140	640
2	380	626
3	1059	620
4	2566	620
5	3845	620
0	8143	620

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize903.0ms (3.6%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.8%	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))))))))) R)
✓	accuracy	99.7%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 lambda1 (.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)))))))))
✓	accuracy	99.7%	(acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.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 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64))))))))
✓	accuracy	86.4%	(cos.f64 (-.f64 phi1 phi2))
✓	accuracy	86.1%	(cos.f64 (+.f64 phi1 phi2))
✓	accuracy	72.3%	(-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2)))
✓	accuracy	99.8%	(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
✓	accuracy	99.3%	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
✓	accuracy	99.9%	(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
✓	accuracy	99.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
✓	accuracy	99.7%	(cos.f64 (-.f64 lambda2 lambda1))
✓	accuracy	95.8%	(acos.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.8%	(fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
✓	accuracy	99.8%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
✓	accuracy	99.7%	(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))

Results

329.0ms	117×	1	valid
313.0ms	14×	5	exit
117.0ms	120×	0	invalid
7.0ms	2×	2	valid
3.0ms	3×	0	valid

Compiler

Compiled 703 to 61 computations (91.3% saved)

Precisions

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

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

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

ival-mult: 62.0ms (11.8% of total)

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

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

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

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

compiled-spec: 7.0ms (1.3% of total)

ival-div: 5.0ms (0.9% of total)

const: 1.0ms (0.2% of total)

series180.0ms (0.7%)

Counts

25 → 996

Calls

Call 1

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

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

Calls

249 calls:

Time	Variable		Point	Expression
36.0ms	phi1	@	0	(/ 4 (+ (* (- (cos (- phi1 phi2)) (cos (+ phi1 phi2))) 2) (* 2 (* (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) 2)))))
15.0ms	phi2	@	inf	(* (acos (/ 1 (/ 4 (+ (* (- (cos (- phi1 phi2)) (cos (+ phi1 phi2))) 2) (* 2 (* (cos (- lambda1 lambda2)) (* (* (cos phi1) (cos phi2)) 2))))))) R)
7.0ms	lambda1	@	-inf	(+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
7.0ms	phi2	@	inf	(+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
3.0ms	phi1	@	inf	(+ (* (* (* (cos phi1) (cos phi2)) (cos lambda2)) (cos lambda1)) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))

rewrite609.0ms (2.4%)

Algorithm

1×	batch-egg-rewrite

Rules

2774×	`-lowering-.f32`
2774×	`-lowering-.f64`
1994×	`sum3-define`
1730×	`fma-lowering-fma.f32`
1730×	`fma-lowering-fma.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	61	408
1	196	357
2	818	327
3	5196	327
0	8086	327

Stop Event

1×	iter limit
1×	node limit

Counts

25 → 569

Calls

Call 1

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

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

simplify446.0ms (1.8%)

Algorithm

1×	egg-herbie

Rules

5506×	`+-lowering-+.f64`
5506×	`+-lowering-+.f32`
5406×	`-lowering-.f32`
5406×	`-lowering-.f64`
1144×	`/-lowering-/.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	928	21340
1	3308	20587
0	8309	20587

Stop Event

1×	iter limit
1×	node limit

Counts

996 → 996

Calls

Call 1

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

Outputs
(+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi1 (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 phi1 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/2 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi1 (sin phi2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (*.f64 phi1 (sin.f64 phi2)) #s(literal -1/6 binary64)))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2))))
(.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* phi2 (sin phi1)) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 phi2 (.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)))))))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (cos phi1)))) (+ (* -1/2 (* (cos phi1) (* (sin lambda1) (sin lambda2)))) (* -1/6 (* phi2 (sin phi1)))))))) (+ (* (cos lambda1) (* (cos lambda2) (cos phi1))) (* (cos phi1) (* (sin lambda1) (sin lambda2)))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 #s(literal -1/6 binary64) (*.f64 phi2 (sin.f64 phi1))))))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.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 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.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 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))) (+ (* (cos lambda1) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 lambda2 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))
(+ (* (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 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi2) (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 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (* -1/6 (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2))))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))))))))
(+ (* (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 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(* R (acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2))))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (sin phi1) (sin phi2)))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+ (* -1/2 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))
(.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* 1/24 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (+.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/24 (* (cos lambda2) (cos phi2))))))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (cos.f64 phi2)) (.f64 (.f64 phi1 phi1) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (+.f64 #s(literal 1/24 binary64) (.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* (cos lambda2) (cos phi1)))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (.f64 (cos.f64 lambda2) (cos.f64 phi1)))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2))))))
(+ (* (cos lambda2) (cos phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (cos phi1)))) (* 1/24 (* (cos lambda2) (cos phi1))))))))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (cos.f64 phi1)) (.f64 (.f64 phi2 phi2) (.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (+.f64 (.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2)) #s(literal 1/24 binary64)))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos phi1) (cos phi2))
(*.f64 (cos.f64 phi2) (cos.f64 phi1))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* (cos phi1) (cos phi2)))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2))))))
(+ (* (cos phi1) (cos phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2))))))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2)) #s(literal 1/24 binary64)))))))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* (cos lambda2) (* (cos phi1) (cos phi2)))
(.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))
(* R (acos (* (cos phi1) (cos (- 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 #s(literal -1/2 binary64) (.f64 (*.f64 phi1 phi1) #s(literal 1/24 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 lambda1) (cos.f64 phi1))
(+ (* -1 (* lambda2 (* (cos phi1) (sin (neg lambda1))))) (* (cos phi1) (cos (neg lambda1))))
(+.f64 (.f64 (cos.f64 lambda1) (cos.f64 phi1)) (.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 lambda1) (cos.f64 phi1)) (.f64 lambda2 (+.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (.f64 (cos.f64 lambda1) (cos.f64 phi1))))))
(+ (* 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 lambda1) (cos.f64 phi1)) (.f64 lambda2 (+.f64 (.f64 (sin.f64 lambda1) (cos.f64 phi1)) (.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 lambda2) (cos.f64 phi1))
(+ (* lambda1 (* (cos phi1) (sin lambda2))) (* (cos lambda2) (cos phi1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (.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 lambda2) (cos.f64 phi1)) (.f64 lambda1 (+.f64 (.f64 (sin.f64 lambda2) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (.f64 (cos.f64 lambda2) (cos.f64 phi1))))))
(+ (* 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 (sin.f64 lambda2) (cos.f64 phi1)) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (cos.f64 phi1)) (.f64 (.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi1))))))))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (- lambda2 lambda1)))
(*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))
(* (cos phi1) (cos (+ lambda2 (* -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 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/720 binary64)))))))
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(cos phi1)
(cos.f64 phi1)
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(* R (acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1)))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(acos (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(* (cos lambda2) (cos phi2))
(*.f64 (cos.f64 lambda2) (cos.f64 phi2))
(+ (* phi1 (sin phi2)) (* (cos lambda2) (cos phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 phi1 (sin.f64 phi2)))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos lambda2) (cos phi2)))))) (* (cos lambda2) (cos phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos lambda2) (cos phi2))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos lambda2) (cos phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 phi1 (+.f64 (.f64 (.f64 phi1 (sin.f64 phi2)) #s(literal -1/6 binary64)) (.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (cos.f64 phi2)))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* (cos lambda2) (cos phi1))
(*.f64 (cos.f64 lambda2) (cos.f64 phi1))
(+ (* phi2 (sin phi1)) (* (cos lambda2) (cos phi1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (.f64 phi2 (sin.f64 phi1)))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos lambda2) (cos phi1)))))) (* (cos lambda2) (cos phi1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 phi2 (cos.f64 lambda2)) (cos.f64 phi1))))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos lambda2) (cos phi1))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos lambda2) (cos phi1)))
(+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (cos.f64 phi1)))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (cos phi2)) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* 1/24 (* (pow lambda2 2) (* (cos phi1) (cos phi2))))))))
(+.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/24 binary64) (.f64 lambda2 lambda2)))))))
(+ (* (cos phi1) (cos phi2)) (+ (* (sin phi1) (sin phi2)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi1) (cos phi2)))) (* 1/24 (* (cos phi1) (cos phi2)))))))))
(+.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 phi2)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 #s(literal -1/720 binary64) (.f64 lambda2 lambda2)) #s(literal 1/24 binary64)))))) (+.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(* 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 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* phi2 (sin phi1))
(*.f64 phi2 (sin.f64 phi1))
(* phi2 (+ (sin phi1) (* -1/6 (* (pow phi2 2) (sin phi1)))))
(.f64 phi2 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 phi2)) #s(literal 1 binary64)) (sin.f64 phi1)))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow phi2 2) (sin phi1)))))))
(.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 (.f64 phi2 phi2) (.f64 (sin.f64 phi1) (+.f64 #s(literal -1/6 binary64) (.f64 #s(literal 1/120 binary64) (.f64 phi2 phi2)))))))
(* phi2 (+ (sin phi1) (* (pow phi2 2) (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (+ (* -1/5040 (* (pow phi2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/6 binary64) (sin.f64 phi1)) (.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 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* (sin phi1) (sin phi2))
(*.f64 (sin.f64 phi2) (sin.f64 phi1))
(* 1/4 (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))))
(+.f64 #s(literal 0 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (*.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(+ (* 1/4 (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* 1/2 (* phi1 (- (sin phi2) (sin (neg phi2))))))
(+.f64 #s(literal 0 binary64) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 (*.f64 #s(literal 1/2 binary64) phi1) (+.f64 (sin.f64 phi2) (sin.f64 phi2)))))
(+ (* 1/4 (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* phi1 (+ (* 1/4 (* phi1 (+ (* -2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 2 (- (* -1/2 (cos (neg phi2))) (* -1/2 (cos phi2))))))) (* 1/2 (- (sin phi2) (sin (neg phi2)))))))
(+.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) phi1) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 phi2) (sin.f64 phi2))))))
(+ (* 1/4 (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2)))))) (* phi1 (+ (* 1/2 (- (sin phi2) (sin (neg phi2)))) (* phi1 (+ (* 1/4 (+ (* -2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 2 (- (* -1/2 (cos (neg phi2))) (* -1/2 (cos phi2)))))) (* 1/2 (* phi1 (- (* -1/6 (sin phi2)) (* -1/6 (sin (neg phi2)))))))))))
(+.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (sin.f64 phi2) (sin.f64 phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 #s(literal -2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 0 binary64) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal -1/6 binary64) (+.f64 (sin.f64 phi2) (sin.f64 phi2))))))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.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 (* phi2 (- (sin phi1) (* -1 (sin phi1))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 #s(literal 2 binary64) (sin.f64 phi1)))))
(+ (* phi2 (+ (* -1/2 (* phi2 (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (- (sin phi1) (* -1 (sin phi1)))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sin.f64 phi1))))))
(+ (* phi2 (+ (* 1/2 (- (sin phi1) (* -1 (sin phi1)))) (* phi2 (+ (* -1/2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/2 (* phi2 (- (* -1/6 (sin phi1)) (* 1/6 (sin phi1))))))))) (* (cos phi1) (cos (- lambda1 lambda2))))
(+.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (sin.f64 phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 (sin.f64 phi1) #s(literal -1/3 binary64))))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
(+ (* -1 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))))
(+.f64 (.f64 lambda1 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))) (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(+ (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (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)))))))))
(+.f64 (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(+ (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (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)))))))))))
(+.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 #s(literal 1/6 binary64) lambda1) (-.f64 #s(literal 0 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))))
(+ (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))))
(+.f64 (.f64 lambda2 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))))
(+ (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))) (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda1))))))
(+.f64 (.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 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))))
(+ (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (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))))))
(+.f64 (.f64 lambda2 (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 #s(literal -1/6 binary64) lambda2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))) (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))
(+ (* -8 (/ (* phi1 (- (sin phi2) (sin (neg phi2)))) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))) (* 4 (/ 1 (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 phi1 (+.f64 (sin.f64 phi2) (sin.f64 phi2)))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))))
(+ (* phi1 (- (* -1 (* phi1 (+ (* -16 (/ (pow (- (sin phi2) (sin (neg phi2))) 2) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 3))) (* 4 (/ (+ (* -2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 2 (- (* -1/2 (cos (neg phi2))) (* -1/2 (cos phi2))))) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))))) (* 8 (/ (- (sin phi2) (sin (neg phi2))) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))) (* 4 (/ 1 (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+.f64 (/.f64 #s(literal 4 binary64) (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 phi1 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 (+.f64 (sin.f64 phi2) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64))) (/.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 #s(literal -2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal -8 binary64) (+.f64 (sin.f64 phi2) (sin.f64 phi2))) (pow.f64 (+.f64 (.f64 (*.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 2 binary64))))))
(+ (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -8 (/ (* (+ (* -2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 2 (- (* -1/2 (cos (neg phi2))) (* -1/2 (cos phi2))))) (- (sin phi2) (sin (neg phi2)))) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 3))) (+ (* -2 (/ (* (+ (* -16 (/ (pow (- (sin phi2) (sin (neg phi2))) 2) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 3))) (* 4 (/ (+ (* -2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 2 (- (* -1/2 (cos (neg phi2))) (* -1/2 (cos phi2))))) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))) (- (sin phi2) (sin (neg phi2)))) (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))))) (* 8 (/ (- (* -1/6 (sin phi2)) (* -1/6 (sin (neg phi2)))) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))))) (+ (* -16 (/ (pow (- (sin phi2) (sin (neg phi2))) 2) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 3))) (* 4 (/ (+ (* -2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 2 (- (* -1/2 (cos (neg phi2))) (* -1/2 (cos phi2))))) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 2)))))) (* 8 (/ (- (sin phi2) (sin (neg phi2))) (pow (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))) 2))))) (* 4 (/ 1 (+ (* 2 (- (cos (neg phi2)) (cos phi2))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+.f64 (/.f64 #s(literal 4 binary64) (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))) (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (.f64 #s(literal -8 binary64) (.f64 (+.f64 (sin.f64 phi2) (sin.f64 phi2)) (+.f64 (.f64 (.f64 #s(literal -2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (+.f64 (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 (+.f64 (sin.f64 phi2) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64))) (/.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 #s(literal -2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 2 binary64)))) (/.f64 (+.f64 (sin.f64 phi2) (sin.f64 phi2)) (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))))) (/.f64 (.f64 #s(literal 8 binary64) (.f64 #s(literal -1/6 binary64) (+.f64 (sin.f64 phi2) (sin.f64 phi2)))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -16 binary64) (pow.f64 (+.f64 (sin.f64 phi2) (sin.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 3 binary64))) (/.f64 (+.f64 #s(literal 0 binary64) (.f64 #s(literal 4 binary64) (.f64 (.f64 #s(literal -2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -8 binary64) (+.f64 (sin.f64 phi2) (sin.f64 phi2))) (pow.f64 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64)) #s(literal 2 binary64))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* -1/2 (/ (* phi2 (- (sin phi1) (* -1 (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 #s(literal -1/2 binary64) (.f64 phi2 (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(+ (* phi2 (- (* phi2 (- (* 1/2 (/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))) (* -1/4 (/ (pow (- (sin phi1) (* -1 (sin phi1))) 2) (* (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3)))))) (* 1/2 (/ (- (sin phi1) (* -1 (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 phi2 (+.f64 (.f64 phi2 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (.f64 #s(literal 2 binary64) (sin.f64 phi1)) #s(literal 2 binary64))) (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) (.f64 #s(literal 2 binary64) (sin.f64 phi1))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* 1/4 (/ (- (sin phi1) (* -1 (sin phi1))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))) (+ (* 1/2 (/ (* (- (sin phi1) (* -1 (sin phi1))) (- (* 1/2 (/ 1 (* (cos phi1) (cos (- lambda1 lambda2))))) (* -1/4 (/ (pow (- (sin phi1) (* -1 (sin phi1))) 2) (* (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3)))))) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/2 (/ (- (* -1/6 (sin phi1)) (* 1/6 (sin phi1))) (* (pow (cos phi1) 2) (pow (cos (- lambda1 lambda2)) 2)))))))) (* 1/2 (/ 1 (* (cos phi1) (cos (- lambda1 lambda2)))))) (* -1/4 (/ (pow (- (sin phi1) (* -1 (sin phi1))) 2) (* (pow (cos phi1) 3) (pow (cos (- lambda1 lambda2)) 3)))))) (* 1/2 (/ (- (sin phi1) (* -1 (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 phi2 (+.f64 (.f64 phi2 (+.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 phi2 (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 #s(literal 2 binary64) (sin.f64 phi1))) (.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/2 binary64) (+.f64 (.f64 (.f64 #s(literal 2 binary64) (sin.f64 phi1)) (/.f64 (-.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (.f64 #s(literal 2 binary64) (sin.f64 phi1)) #s(literal 2 binary64))) (pow.f64 (cos.f64 phi1) #s(literal 3 binary64))) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))) (/.f64 (.f64 (sin.f64 phi1) #s(literal -1/3 binary64)) (.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 1/4 binary64) (/.f64 (pow.f64 (.f64 #s(literal 2 binary64) (sin.f64 phi1)) #s(literal 2 binary64)) (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) (.f64 #s(literal 2 binary64) (sin.f64 phi1))) (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))))
(+ (* 16 (/ (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 2))) (* 4 (/ 1 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
(+.f64 (/.f64 (.f64 #s(literal 16 binary64) (.f64 lambda1 (-.f64 #s(literal 0 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(+ (* lambda1 (- (* -1 (* lambda1 (+ (* -64 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 3))) (* -8 (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 2)))))) (* -16 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 2))))) (* 4 (/ 1 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
(+.f64 (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))) (.f64 lambda1 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda1) (+.f64 (/.f64 (.f64 #s(literal -64 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -8 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 16 binary64) (-.f64 #s(literal 0 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 2 binary64))))))
(+ (* lambda1 (- (* lambda1 (- (* -1 (* lambda1 (+ (* -32 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (* (cos (neg lambda2)) (sin (neg lambda2))))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 3))) (+ (* 8/3 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 2))) (* 4 (/ (* (cos phi1) (* (cos phi2) (* (sin (neg lambda2)) (+ (* -64 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 3))) (* -8 (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 2))))))) (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))))) (+ (* -64 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin (neg lambda2)) 2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 3))) (* -8 (/ (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 2)))))) (* -16 (/ (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))) 2))))) (* 4 (/ 1 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
(+.f64 (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))) (.f64 lambda1 (+.f64 (.f64 lambda1 (-.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda1) (+.f64 (.f64 #s(literal 4 binary64) (.f64 (.f64 (neg.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda2))) (+.f64 (/.f64 (.f64 #s(literal -64 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -8 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 2 binary64))))) (/.f64 (cos.f64 phi1) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))))))) (+.f64 (/.f64 (.f64 #s(literal -32 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (neg.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (cos.f64 lambda2)) (sin.f64 lambda2))))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal 8/3 binary64) (-.f64 #s(literal 0 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 2 binary64)))))) (+.f64 (/.f64 (.f64 #s(literal -64 binary64) (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) #s(literal 2 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -8 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal 16 binary64) (-.f64 #s(literal 0 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) #s(literal 2 binary64))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))))
(+ (* -16 (/ (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 2))) (* 4 (/ 1 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
(+.f64 (/.f64 (.f64 #s(literal -16 binary64) (.f64 lambda2 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))))
(+ (* lambda2 (- (* -1 (* lambda2 (+ (* -64 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 3))) (* -8 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 2)))))) (* 16 (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 2))))) (* 4 (/ 1 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
(+.f64 (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))) (.f64 lambda2 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 (+.f64 (/.f64 (.f64 #s(literal -64 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -8 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -16 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 2 binary64))))))
(+ (* lambda2 (- (* lambda2 (- (* -1 (* lambda2 (+ (* -4 (/ (* (cos phi1) (* (cos phi2) (* (sin lambda1) (+ (* -64 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 3))) (* -8 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 2))))))) (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))))) (+ (* -8/3 (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 2))) (* 32 (/ (* (cos lambda1) (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (sin lambda1)))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 3))))))) (+ (* -64 (/ (* (pow (cos phi1) 2) (* (pow (cos phi2) 2) (pow (sin lambda1) 2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 3))) (* -8 (/ (* (cos lambda1) (* (cos phi1) (cos phi2))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 2)))))) (* 16 (/ (* (cos phi1) (* (cos phi2) (sin lambda1))) (pow (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))) 2))))) (* 4 (/ 1 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))))))
(+.f64 (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))) (.f64 lambda2 (+.f64 (.f64 lambda2 (+.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 (cos.f64 phi1) (.f64 (.f64 (cos.f64 phi2) (sin.f64 lambda1)) (+.f64 (/.f64 (.f64 #s(literal -64 binary64) (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 3 binary64))) (/.f64 (.f64 #s(literal -8 binary64) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 2 binary64))))))) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 #s(literal -8/3 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 32 binary64) (.f64 (.f64 (cos.f64 lambda1) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (.f64 (sin.f64 lambda1) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal 64 binary64) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (pow.f64 (cos.f64 phi2) #s(literal 2 binary64))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 3 binary64))))) (.f64 #s(literal 8 binary64) (/.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -16 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1)))) (pow.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))) #s(literal 2 binary64))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(/ 4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))
(/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))
(.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* -4 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))))
(+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 (.f64 #s(literal -4 binary64) lambda1) (-.f64 #s(literal 0 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))))
(+ (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -4 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* -2 (* lambda1 (* (cos phi1) (* (cos phi2) (cos (neg lambda2)))))))))
(+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 lambda1 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))) #s(literal -4 binary64)) (.f64 (.f64 #s(literal -2 binary64) lambda1) (.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(+ (* 4 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* lambda1 (+ (* -4 (* (cos phi1) (* (cos phi2) (sin (neg lambda2))))) (* lambda1 (+ (* -2 (* (cos phi1) (* (cos phi2) (cos (neg lambda2))))) (* 2/3 (* lambda1 (* (cos phi1) (* (cos phi2) (sin (neg lambda2)))))))))))
(+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 lambda1 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2))) #s(literal -4 binary64)) (.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (cos.f64 phi1)) (.f64 (cos.f64 lambda2) (cos.f64 phi2))) (.f64 (.f64 #s(literal 2/3 binary64) lambda1) (-.f64 #s(literal 0 binary64) (.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)))))))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos lambda1) (* (cos phi1) (cos phi2))))
(.f64 (.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64))
(+ (* 4 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))) (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2)))))
(.f64 #s(literal 4 binary64) (+.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda2 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (sin.f64 lambda1))))))
(+ (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* -2 (* lambda2 (* (cos lambda1) (* (cos phi1) (cos phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (sin lambda1)))))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -2 binary64) lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))))
(+ (* 4 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* lambda2 (+ (* 4 (* (cos phi1) (* (cos phi2) (sin lambda1)))) (* lambda2 (+ (* -2 (* (cos lambda1) (* (cos phi1) (cos phi2)))) (* -2/3 (* lambda2 (* (cos phi1) (* (cos phi2) (sin lambda1))))))))))
(+.f64 (.f64 (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))) #s(literal 4 binary64)) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (.f64 (cos.f64 phi2) (sin.f64 lambda1))) (.f64 lambda2 (+.f64 (.f64 (.f64 #s(literal -2 binary64) (cos.f64 lambda1)) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (.f64 #s(literal -2/3 binary64) lambda2) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi2) (cos (- lambda1 lambda2))))
(.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* -2 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 4 (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(literal 4 binary64) (.f64 #s(literal -2 binary64) (.f64 phi1 phi1))))
(+ (* 4 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(+.f64 (.f64 (.f64 #s(literal 4 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 -2 binary64) (.f64 #s(literal 1/6 binary64) (.f64 phi1 phi1))))))
(+ (* 4 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -2 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/180 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/6 (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #s(literal -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 (.f64 #s(literal -1/180 binary64) (.f64 phi1 phi1)) #s(literal 1/6 binary64)))))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (cos (- lambda1 lambda2))))
(.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(+ (* -2 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 4 (* (cos phi1) (cos (- lambda1 lambda2)))))
(.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 #s(literal 4 binary64) (.f64 #s(literal -2 binary64) (.f64 phi2 phi2))))
(+ (* 4 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* 1/6 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))))))
(+.f64 (.f64 (.f64 #s(literal 4 binary64) (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 -2 binary64) (.f64 #s(literal 1/6 binary64) (.f64 phi2 phi2))))))
(+ (* 4 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -2 (* (cos phi1) (cos (- lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1/180 (* (pow phi2 2) (* (cos phi1) (cos (- lambda1 lambda2))))) (* 1/6 (* (cos phi1) (cos (- lambda1 lambda2)))))))))
(+.f64 (.f64 (.f64 #s(literal 4 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 #s(literal -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/180 binary64) (.f64 phi2 phi2)) #s(literal 1/6 binary64)))))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))
(.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1)))))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2))))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(* R (acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(.f64 R (acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+ 1 (* -1/2 (pow lambda1 2)))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)) (*.f64 lambda1 lambda2)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 lambda1 lambda1)))))))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)) (.f64 lambda2 (+.f64 lambda1 (.f64 lambda2 (+.f64 #s(literal -1/2 binary64) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 lambda1 lambda1)) (.f64 #s(literal -1/6 binary64) (.f64 lambda1 lambda2)))))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (sin.f64 lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(.f64 (.f64 lambda1 lambda1) (+.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (/.f64 (sin.f64 lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (+.f64 (/.f64 (sin.f64 lambda2) lambda1) (/.f64 (/.f64 (cos.f64 lambda2) lambda1) lambda1))))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (+.f64 (/.f64 (sin.f64 lambda2) lambda1) (/.f64 (/.f64 (cos.f64 lambda2) lambda1) lambda1))))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)) (cos.f64 lambda2))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(.f64 (.f64 lambda1 lambda1) (+.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (/.f64 (sin.f64 lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1/2 (* (pow lambda1 2) (cos lambda2))) (* lambda1 (sin lambda2)))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))) (cos.f64 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1/2 (* (pow lambda1 2) (cos lambda2))) (* lambda1 (sin lambda2)))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))) (cos.f64 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1/2 (* (pow lambda1 2) (cos lambda2))) (* lambda1 (sin lambda2)))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))) (cos.f64 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1/2 (* (pow lambda1 2) (cos lambda2))) (* lambda1 (sin lambda2)))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))) (cos.f64 lambda2)))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(* R (acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))))
(.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1/2 (* (pow lambda1 2) (cos lambda2))) (* lambda1 (sin lambda2)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1))) (cos.f64 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1/2 (* (pow lambda1 2) (cos lambda2))) (* lambda1 (sin lambda2)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1))) (cos.f64 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1/2 (* (pow lambda1 2) (cos lambda2))) (* lambda1 (sin lambda2)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1))) (cos.f64 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (+ (* -1/2 (* (pow lambda1 2) (cos lambda2))) (* lambda1 (sin lambda2)))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1))) (cos.f64 lambda2))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(acos (+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2))))
(acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))))
(* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))
(.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))
(+ (* phi1 (sin phi2)) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
(+.f64 (.f64 phi1 (sin.f64 phi2)) (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* phi1 (+ (sin phi2) (* -1/2 (* phi1 (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))))) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 phi2) phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))))))
(+ (* phi1 (+ (sin phi2) (* phi1 (+ (* -1/2 (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* -1/6 (* phi1 (sin phi2))))))) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
(+.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 phi1 (+.f64 (.f64 (.f64 phi1 (sin.f64 phi2)) #s(literal -1/6 binary64)) (.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(* (cos phi1) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))
(.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2)))))))
(+ (* phi2 (sin phi1)) (* (cos phi1) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
(+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* phi2 (+ (sin phi1) (* -1/2 (* phi2 (* (cos phi1) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))))) (* (cos phi1) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (.f64 phi2 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2))))))))))))
(+ (* phi2 (+ (sin phi1) (* phi2 (+ (* -1/2 (* (cos phi1) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* -1/6 (* phi2 (sin phi1))))))) (* (cos phi1) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))))
(+.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 (sin.f64 phi1))) (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ 1 (* -1/2 (pow lambda1 2))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1)))))
(+ (* lambda1 (* lambda2 (* (cos phi1) (cos phi2)))) (+ (* (cos phi1) (* (cos phi2) (+ 1 (* -1/2 (pow lambda1 2))))) (* (sin phi1) (sin phi2))))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1)))) (.f64 (.f64 lambda1 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+ (* lambda2 (+ (* lambda1 (* (cos phi1) (cos phi2))) (* lambda2 (* (cos phi1) (* (cos phi2) (- (* 1/4 (pow lambda1 2)) 1/2)))))) (+ (* (cos phi1) (* (cos phi2) (+ 1 (* -1/2 (pow lambda1 2))))) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))) (.f64 lambda2 (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 lambda2 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1))))))))
(+ (* lambda2 (+ (* lambda1 (* (cos phi1) (cos phi2))) (* lambda2 (+ (* -1/6 (* lambda1 (* lambda2 (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (- (* 1/4 (pow lambda1 2)) 1/2))))))) (+ (* (cos phi1) (* (cos phi2) (+ 1 (* -1/2 (pow lambda1 2))))) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 lambda1))))) (.f64 lambda2 (+.f64 (.f64 (.f64 lambda1 (cos.f64 phi1)) (cos.f64 phi2)) (.f64 lambda2 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/4 binary64) (.f64 lambda1 lambda1)))) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 lambda1 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos phi1) (* (cos phi2) (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (cos.f64 lambda2))))))))
(+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2)))
(+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(+ (* lambda1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 lambda1 (.f64 (.f64 (cos.f64 phi2) (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 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi1) (cos phi2))))) (* (cos phi1) (* (cos phi2) (sin lambda2))))) (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))))
(+.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 (sin.f64 phi2) (sin.f64 phi1))) (.f64 lambda1 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 (cos.f64 lambda2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))))))
(* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 lambda1 lambda1)))
(* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (/ (* (cos phi1) (* (cos phi2) (sin lambda2))) lambda1)))
(.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (sin.f64 lambda2) lambda1)))))
(* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (/ (* (cos lambda2) (* (cos phi1) (cos phi2))) (pow lambda1 2)) (+ (/ (* (cos phi1) (* (cos phi2) (sin lambda2))) lambda1) (/ (* (sin phi1) (sin phi2)) (pow lambda1 2))))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (/.f64 (cos.f64 lambda2) lambda1) lambda1))) (/.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 lambda1 lambda1))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (sin.f64 lambda2) lambda1)))))
(* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (+ (/ (* (cos lambda2) (* (cos phi1) (cos phi2))) (pow lambda1 2)) (+ (/ (* (cos phi1) (* (cos phi2) (sin lambda2))) lambda1) (/ (* (sin phi1) (sin phi2)) (pow lambda1 2))))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (/.f64 (/.f64 (cos.f64 lambda2) lambda1) lambda1))) (/.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 lambda1 lambda1))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (sin.f64 lambda2) lambda1)))))
(* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi1) (cos phi2)))))
(.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 lambda1 lambda1)))
(* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2)))) (/ (* (cos phi1) (* (cos phi2) (sin lambda2))) lambda1)))
(.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 (sin.f64 lambda2) lambda1)))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* -1 (/ (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) lambda1))) lambda1)) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (/.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) lambda1)) lambda1))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (* (cos phi1) (* (cos phi2) (sin lambda2)))) (* -1 (/ (+ (* (cos lambda2) (* (cos phi1) (cos phi2))) (* (sin phi1) (sin phi2))) lambda1))) lambda1)) (* -1/2 (* (cos lambda2) (* (cos phi1) (cos phi2))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 lambda2)) (/.f64 (+.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) lambda1)) lambda1))))
(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 #s(literal 1/6 binary64) (*.f64 lambda2 (-.f64 #s(literal 0 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 #s(literal -1/2 binary64) (*.f64 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 (*.f64 #s(literal -1/6 binary64) 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))
(- (cos (neg phi2)) (cos phi2))
#s(literal 0 binary64)
(- (+ (cos (neg phi2)) (* phi1 (- (sin phi2) (sin (neg phi2))))) (cos phi2))
(+.f64 (*.f64 phi1 (+.f64 (sin.f64 phi2) (sin.f64 phi2))) #s(literal 0 binary64))
(- (+ (cos (neg phi2)) (* phi1 (- (+ (sin phi2) (* phi1 (- (* -1/2 (cos (neg phi2))) (* -1/2 (cos phi2))))) (sin (neg phi2))))) (cos phi2))
(+.f64 (.f64 phi1 (+.f64 (.f64 phi1 #s(literal 0 binary64)) (+.f64 (sin.f64 phi2) (sin.f64 phi2)))) #s(literal 0 binary64))
(- (+ (cos (neg phi2)) (* phi1 (- (+ (sin phi2) (* phi1 (- (+ (* -1/2 (cos (neg phi2))) (* phi1 (- (* -1/6 (sin phi2)) (* -1/6 (sin (neg phi2)))))) (* -1/2 (cos phi2))))) (sin (neg phi2))))) (cos phi2))
(+.f64 (.f64 phi1 (+.f64 (sin.f64 phi2) (+.f64 (sin.f64 phi2) (.f64 phi1 (+.f64 (.f64 phi1 (.f64 #s(literal -1/6 binary64) (+.f64 (sin.f64 phi2) (sin.f64 phi2)))) #s(literal 0 binary64)))))) #s(literal 0 binary64))
(- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(* phi2 (- (sin phi1) (* -1 (sin phi1))))
(.f64 phi2 (.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(* phi2 (- (+ (sin phi1) (* (pow phi2 2) (- (* -1/6 (sin phi1)) (* 1/6 (sin phi1))))) (* -1 (sin phi1))))
(.f64 phi2 (+.f64 (.f64 (.f64 phi2 phi2) (.f64 (sin.f64 phi1) #s(literal -1/3 binary64))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1))))
(* phi2 (- (+ (sin phi1) (* (pow phi2 2) (- (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (- (* 1/120 (sin phi1)) (* -1/120 (sin phi1))))) (* 1/6 (sin phi1))))) (* -1 (sin phi1))))
(.f64 phi2 (+.f64 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) (.f64 (sin.f64 phi1) #s(literal 1/60 binary64))) (.f64 (sin.f64 phi1) #s(literal -1/3 binary64)))) (.f64 #s(literal 2 binary64) (sin.f64 phi1))))
(* phi2 (- (+ (sin phi1) (* (pow phi2 2) (- (+ (* -1/6 (sin phi1)) (* (pow phi2 2) (- (+ (* 1/120 (sin phi1)) (* (pow phi2 2) (- (* -1/5040 (sin phi1)) (* 1/5040 (sin phi1))))) (* -1/120 (sin phi1))))) (* 1/6 (sin phi1))))) (* -1 (sin phi1))))
(.f64 phi2 (+.f64 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) (.f64 (sin.f64 phi1) #s(literal -1/2520 binary64))) (.f64 (sin.f64 phi1) #s(literal 1/60 binary64)))) (.f64 (sin.f64 phi1) #s(literal -1/3 binary64)))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1))))
(- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))
(-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(-.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+.f64 (cos.f64 phi2) (.f64 phi1 (-.f64 (.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 phi2)) (sin.f64 phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(+.f64 (cos.f64 phi2) (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (.f64 (*.f64 phi1 (sin.f64 phi2)) #s(literal 1/6 binary64)))) (sin.f64 phi2))))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(-.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+.f64 (cos.f64 phi1) (.f64 phi2 (-.f64 (.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+.f64 (cos.f64 phi1) (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (.f64 (*.f64 phi2 (sin.f64 phi1)) #s(literal 1/6 binary64)))) (sin.f64 phi1))))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (neg phi2))
(cos.f64 phi2)
(+ (cos (neg phi2)) (* -1 (* phi1 (sin (neg phi2)))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos (neg phi2)) (* phi1 (- (* -1/2 (* phi1 (cos (neg phi2)))) (sin (neg phi2)))))
(+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 (*.f64 #s(literal -1/2 binary64) phi1) (cos.f64 phi2)))))
(+ (cos (neg phi2)) (* phi1 (- (* phi1 (+ (* -1/2 (cos (neg phi2))) (* 1/6 (* phi1 (sin (neg phi2)))))) (sin (neg phi2)))))
(+.f64 (cos.f64 phi2) (.f64 phi1 (+.f64 (sin.f64 phi2) (.f64 phi1 (+.f64 (.f64 (cos.f64 phi2) #s(literal -1/2 binary64)) (neg.f64 (.f64 (*.f64 phi1 (sin.f64 phi2)) #s(literal 1/6 binary64))))))))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos (neg (+ phi2 (* -1 phi1))))
(cos.f64 (-.f64 phi2 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* phi2 (sin phi1)))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (* -1 (sin phi1)))))
(+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1))))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* -1/6 (* phi2 (sin phi1))))) (* -1 (sin phi1)))))
(+.f64 (cos.f64 phi1) (.f64 phi2 (+.f64 (sin.f64 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 phi2 (sin.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)))))))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (- phi1 phi2))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(cos (+ phi1 (* -1 phi2)))
(cos.f64 (-.f64 phi2 phi1))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (neg (+ phi2 (* -1 phi1)))) (cos (- phi2 (* -1 phi1))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (+ phi1 (* -1 phi2))) (cos (- phi1 (* -1 phi2))))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (neg (+ lambda2 (* -1 lambda1))))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (- lambda1 lambda2))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))
(acos (* 1/4 (+ (* 2 (- (cos (- phi1 phi2)) (cos (+ phi1 phi2)))) (* 4 (* (cos phi1) (* (cos phi2) (cos (+ lambda1 (* -1 lambda2)))))))))
(acos.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 phi2 phi1)) (cos.f64 (+.f64 phi2 phi1)))) (.f64 #s(literal 4 binary64) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))))

eval251.0ms (1%)

Compiler: Compiled 54521 to 4847 computations (91.1% saved)

prune230.0ms (0.9%)

Pruning

65 alts after pruning (62 fresh and 3 done)

	Pruned	Kept	Total
New	1748	51	1799
Fresh	15	11	26
Picked	3	2	5
Done	0	1	1
Total	1766	65	1831

Accuracy

94.4%

Counts

1831 → 65

Alt Table

Click to see full alt table

Status	Accuracy	Program
	78.9%	(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
	78.7%	(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
	55.2%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R))
	45.7%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R))
	45.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	77.2%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)) (neg.f64 (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64))))))) R)
	54.8%	(.f64 (fma.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))))) R)
	46.9%	(.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)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 (.f64 lambda1 (.f64 lambda1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (cos.f64 lambda2))))))) R)
	78.9%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	78.9%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R)
	55.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	45.7%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	78.6%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64)))))) R)
	93.7%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
▶	93.7%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (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)
▶	78.9%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	49.4%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	55.3%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))))) R)
	78.9%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	53.9%	(.f64 (acos.f64 (/.f64 (+.f64 (.f64 (.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.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)))))) R)
	33.2%	(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) R)
	45.6%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	72.1%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 4 binary64)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 4 binary64)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))) R)
	41.7%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 (*.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))))) R)
	60.4%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R)
	78.7%	(.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64)))))) R)
	45.7%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	60.4%	(.f64 (acos.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	42.9%	(.f64 (acos.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	43.0%	(.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 lambda2)))) R)
▶	55.2%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	93.7%	(.f64 (acos.f64 (+.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) R)
	56.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
	43.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
	25.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2)))))))) R)
	93.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	93.7%	(.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)
	50.1%	(.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)
	24.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))) R)
✓	78.9%	(.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)
✓	55.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	32.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) R)
	29.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) R)
	30.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))) R)
	47.5%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (sin.f64 phi1)))) R)
	23.4%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 phi1 (sin.f64 phi2)))) R)
	25.9%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
	37.2%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	17.4%	(.f64 (acos.f64 (.f64 (+.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 (.f64 phi1 phi1) #s(literal -1/720 binary64))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	17.4%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	17.3%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	49.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	23.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))) R)
	41.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	54.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	54.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
	26.9%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2))))))) R)
▶	27.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
✓	45.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	31.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
	33.1%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
	30.0%	(.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R)
	33.4%	(.f64 (acos.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 lambda2 lambda1) (-.f64 phi1 (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) R)
	10.3%	(.f64 (acos.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 lambda1)))) R)
▶	25.7%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)

Compiler

Compiled 3341 to 2358 computations (29.4% saved)

simplify139.0ms (0.5%)

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

2026×	`fma-define`
1944×	`sum3-define`
1626×	`fma-lowering-fma.f32`
1626×	`fma-lowering-fma.f64`
1452×	`-lowering-.f32`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	48	412
1	105	404
2	220	389
3	426	386
4	553	386
5	681	386
6	928	386
7	1261	386
8	2153	386
9	4199	386
10	6065	386
0	8060	386

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize776.0ms (3.1%)

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.7%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.7%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
✓	accuracy	99.5%	(cos.f64 (-.f64 lambda2 lambda1))
✓	accuracy	99.5%	(acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2))))
✓	accuracy	99.7%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
✓	accuracy	99.7%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.7%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
✓	accuracy	93.9%	(acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
✓	accuracy	99.9%	(*.f64 lambda2 (sin.f64 lambda1))
✓	accuracy	99.9%	(.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))
✓	accuracy	99.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
✓	accuracy	92.6%	(acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))
✓	accuracy	100.0%	(-.f64 lambda1 lambda2)
✓	accuracy	99.8%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
✓	accuracy	99.5%	(cos.f64 (-.f64 lambda1 lambda2))
✓	accuracy	82.1%	(acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))
✓	accuracy	99.8%	(.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
✓	accuracy	99.7%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.7%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (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)
✓	accuracy	99.5%	(acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (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)))))

Results

288.0ms	126×	1	valid
204.0ms	11×	5	exit
92.0ms	85×	0	invalid
51.0ms	15×	2	valid
23.0ms	12×	1	invalid
5.0ms	6×	0	valid
4.0ms	1×	2	invalid

Compiler

Compiled 439 to 47 computations (89.3% saved)

Precisions

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

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

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

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

ival-acos: 52.0ms (11.9% of total)

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

compiled-spec: 19.0ms (4.3% of total)

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

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

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

const: 1.0ms (0.2% of total)

series91.0ms (0.4%)

Counts

24 → 888

Calls

Call 1

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

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

222 calls:

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

rewrite274.0ms (1.1%)

Algorithm

1×	batch-egg-rewrite

Rules

2412×	`-lowering-.f32`
2412×	`-lowering-.f64`
1714×	`+-lowering-+.f64`
1714×	`+-lowering-+.f32`
1506×	`/-lowering-/.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	48	311
1	162	305
2	655	233
3	4357	233
0	8155	233

Stop Event

1×	iter limit
1×	node limit

Counts

24 → 676

Calls

Call 1

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

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

simplify371.0ms (1.5%)

Algorithm

1×	egg-herbie

Rules

5198×	`-lowering-.f32`
5198×	`-lowering-.f64`
4660×	`+-lowering-+.f64`
4660×	`+-lowering-+.f32`
1664×	`sum4-define`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	600	13601
1	2244	13185
2	4765	13161
0	8270	13161

Stop Event

1×	iter limit
1×	node limit

Counts

888 → 888

Calls

Call 1

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

eval238.0ms (0.9%)

Compiler: Compiled 43698 to 3858 computations (91.2% saved)

prune282.0ms (1.1%)

Pruning

94 alts after pruning (88 fresh and 6 done)

	Pruned	Kept	Total
New	1730	44	1774
Fresh	13	44	57
Picked	2	3	5
Done	0	3	3
Total	1745	94	1839

Accuracy

97.4%

Counts

1839 → 94

Alt Table

Click to see full alt table

Status	Accuracy	Program
	78.9%	(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
	2.9%	(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R))
	78.7%	(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
	5.9%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) R))
	55.2%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R))
	27.7%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))) R))
	45.7%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R))
	9.4%	(+.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda1) R) (.f64 lambda2 R))
	27.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))))) R)
	45.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	54.8%	(.f64 (fma.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
	5.9%	(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) R)
	46.9%	(.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)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 (.f64 lambda1 (.f64 lambda1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (cos.f64 lambda2))))))) R)
	78.9%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	55.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
	27.7%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))) R)
	45.7%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	78.6%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64)))))) R)
	9.5%	(*.f64 (-.f64 lambda2 lambda1) R)
	19.6%	(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda1 lambda2) (.f64 (PI.f64) #s(literal 2 binary64)))) R)
	93.7%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	86.1%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	57.9%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) lambda1))) (cos.f64 lambda2)) (.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) lambda1))) (sin.f64 lambda2)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	57.8%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (cos.f64 lambda2)) (.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	93.7%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) (cos.f64 lambda1)) (.f64 (sin.f64 (+.f64 lambda2 #s(literal 0 binary64))) (sin.f64 lambda1)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
✓	78.9%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	49.4%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	78.9%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)
	45.2%	(.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
▶	93.7%	(.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	29.9%	(.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
	39.0%	(.f64 (acos.f64 (/.f64 (+.f64 (.f64 (.f64 (cos.f64 lambda2) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi2))))) R)
	33.2%	(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) R)
	45.6%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	72.1%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 (-.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 4 binary64)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 4 binary64)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))) R)
	41.7%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 (*.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))))) R)
	60.4%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R)
	78.7%	(.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64)))))) R)
	45.7%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	11.5%	(.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))) R)
▶	60.4%	(.f64 (acos.f64 (-.f64 (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	42.9%	(.f64 (acos.f64 (-.f64 (+.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	20.5%	(.f64 (acos.f64 (-.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) lambda2))) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) lambda2))) (sin.f64 lambda1)))) R)
	11.1%	(.f64 (acos.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (/.f64 (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) #s(literal -2 binary64)))) R)
	55.3%	(.f64 (acos.f64 (+.f64 (/.f64 (sin.f64 phi1) (/.f64 #s(literal 1 binary64) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	55.2%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	11.1%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
	20.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (sin.f64 lambda1)))) R)
	21.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)))) R)
	56.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
	43.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
	25.5%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (+.f64 (.f64 (.f64 lambda2 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 #s(literal -1/2 binary64) (.f64 #s(literal 1/24 binary64) (.f64 lambda2 lambda2))))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) R)
	93.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	93.7%	(.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)
	50.1%	(.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)
	24.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))) R)
✓	78.9%	(.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)
✓	55.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	32.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) R)
	29.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) R)
	30.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))) R)
▶	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) (cos.f64 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 #s(literal 0 binary64))) (sin.f64 lambda1)))) R)
	47.5%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (*.f64 phi2 (sin.f64 phi1)))) R)
	23.4%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 phi1 (sin.f64 phi2)))) R)
	25.9%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
	37.2%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
▶	12.0%	(.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) R)
	11.5%	(.f64 (acos.f64 (.f64 (+.f64 (*.f64 lambda2 lambda1) #s(literal 1 binary64)) (cos.f64 phi1))) R)
	17.4%	(.f64 (acos.f64 (.f64 (+.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 (.f64 phi1 phi1) #s(literal -1/720 binary64))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	17.4%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	17.3%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	13.2%	(.f64 (acos.f64 (.f64 (*.f64 lambda2 (cos.f64 phi1)) (sin.f64 lambda1))) R)
	49.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	23.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))) R)
	41.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	54.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	54.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
	26.9%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2))))))) R)
✓	27.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
✓	45.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	31.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
	33.1%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
	30.0%	(.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R)
	33.4%	(.f64 (acos.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 lambda2 lambda1) (-.f64 phi1 (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) R)
	11.4%	(.f64 (acos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))) R)
	10.3%	(.f64 (acos.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 lambda1)))) R)
	15.9%	(*.f64 (acos.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
✓	25.7%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
	20.0%	(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
	19.0%	(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
	17.7%	(*.f64 (acos.f64 (cos.f64 phi1)) R)
	16.3%	(*.f64 (acos.f64 (cos.f64 lambda2)) R)
	16.2%	(*.f64 (acos.f64 (cos.f64 lambda1)) R)
▶	3.0%	(*.f64 lambda1 R)

Compiler

Compiled 4510 to 3178 computations (29.5% saved)

simplify169.0ms (0.7%)

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

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

Rules

2252×	`sum4-define`
2054×	`fnmadd-define`
1800×	`sum5-define`
1760×	`sum3-define`
1742×	`-lowering-.f32`

Iterations

Useful iterations: 5 (0.0ms)

Iter	Nodes	Cost
0	52	409
1	104	406
2	219	388
3	471	388
4	719	388
5	1108	385
6	2022	385
7	3778	385
8	6628	385
0	8326	385

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize787.0ms (3.1%)

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.5%	(cos.f64 (-.f64 lambda1 lambda2))
✓	accuracy	99.5%	(-.f64 (+.f64 (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))
✓	accuracy	85.8%	(cos.f64 (-.f64 phi1 phi2))
✓	accuracy	85.5%	(cos.f64 (+.f64 phi1 phi2))
✓	accuracy	100.0%	(+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) (cos.f64 lambda1)) (.f64 (sin.f64 (+.f64 lambda2 #s(literal 0 binary64))) (sin.f64 lambda1)))
✓	accuracy	99.9%	(*.f64 (sin.f64 (+.f64 lambda2 #s(literal 0 binary64))) (sin.f64 lambda1))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) (cos.f64 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 #s(literal 0 binary64))) (sin.f64 lambda1)))) R)
✓	accuracy	84.4%	(acos.f64 (+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) (cos.f64 lambda1)) (.f64 (sin.f64 (+.f64 lambda2 #s(literal 0 binary64))) (sin.f64 lambda1))))
✓	accuracy	100.0%	(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
✓	accuracy	99.9%	(*.f64 lambda2 (sin.f64 lambda1))
✓	accuracy	99.8%	(.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) R)
✓	accuracy	80.0%	(acos.f64 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
✓	accuracy	100.0%	(*.f64 lambda1 R)
✓	accuracy	99.8%	(.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda2))))
✓	accuracy	99.8%	(.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
✓	accuracy	99.8%	(*.f64 (sin.f64 phi1) (sin.f64 phi2))
✓	accuracy	99.6%	(acos.f64 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2)))))

Results

286.0ms	117×	1	valid
153.0ms	8×	5	exit
91.0ms	86×	0	invalid
59.0ms	25×	1	invalid
49.0ms	10×	2	valid
46.0ms	8×	2	invalid
2.0ms	2×	0	valid

Compiler

Compiled 448 to 52 computations (88.4% saved)

Precisions

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

ival-cos: 184.0ms (38.4% of total)

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

ival-mult: 50.0ms (10.4% of total)

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

backward-pass: 36.0ms (7.5% of total)

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

compiled-spec: 8.0ms (1.7% of total)

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

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

const: 1.0ms (0.2% of total)

series51.0ms (0.2%)

Counts

24 → 780

Calls

Call 1

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

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

Calls

195 calls:

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

rewrite399.0ms (1.6%)

Algorithm

1×	batch-egg-rewrite

Rules

2424×	`-lowering-.f32`
2424×	`-lowering-.f64`
2140×	`fma-lowering-fma.f32`
2140×	`fma-lowering-fma.f64`
1862×	`fmsub-define`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	52	272
1	157	193
2	681	193
3	5846	193
0	8878	193

Stop Event

1×	iter limit
1×	node limit

Counts

24 → 862

Calls

Call 1

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

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

simplify392.0ms (1.5%)

Algorithm

1×	egg-herbie

Rules

5510×	`-lowering-.f32`
5510×	`-lowering-.f64`
2810×	`+-lowering-+.f64`
2810×	`+-lowering-+.f32`
1496×	`associate-r`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	626	13187
1	2278	12877
2	7206	12866
0	8180	12866

Stop Event

1×	iter limit
1×	node limit

Counts

780 → 780

Calls

Call 1

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

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

eval237.0ms (0.9%)

Compiler: Compiled 51934 to 4976 computations (90.4% saved)

prune296.0ms (1.2%)

Pruning

104 alts after pruning (95 fresh and 9 done)

	Pruned	Kept	Total
New	1661	23	1684
Fresh	11	72	83
Picked	2	3	5
Done	0	6	6
Total	1674	104	1778

Accuracy

97.4%

Counts

1778 → 104

Alt Table

Click to see full alt table

Status	Accuracy	Program
	78.9%	(fma.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
	2.9%	(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R))
	78.7%	(+.f64 (/.f64 R (/.f64 #s(literal 2 binary64) (PI.f64))) (neg.f64 (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
	5.9%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) R))
	55.2%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R))
	27.7%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))) R))
	45.7%	(+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (.f64 (-.f64 #s(literal 0 binary64) (asin.f64 (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R))
	9.4%	(+.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda1) R) (.f64 lambda2 R))
	11.4%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))))) R)
	45.3%	(.f64 (fma.f64 (sqrt.f64 (PI.f64)) (/.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	54.8%	(.f64 (fma.f64 (cbrt.f64 (.f64 (PI.f64) (PI.f64))) (/.f64 (cbrt.f64 (PI.f64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))) R)
	5.9%	(*.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2))) R)
	46.9%	(.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)) (+.f64 (.f64 lambda1 (sin.f64 lambda2)) (.f64 (+.f64 (.f64 lambda1 (.f64 lambda1 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (cos.f64 lambda2))))))) R)
	78.9%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)
	55.3%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi1) (cos.f64 phi2)))))) R)
	12.0%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1))))) R)
	27.7%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))) R)
	45.7%	(.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) R)
	78.6%	(.f64 (-.f64 (PI.f64) (acos.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64)))))) R)
	9.5%	(*.f64 (-.f64 lambda2 lambda1) R)
	19.6%	(.f64 (fabs.f64 (remainder.f64 (-.f64 lambda2 lambda1) (.f64 #s(literal 2 binary64) (PI.f64)))) R)
	93.7%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (+.f64 (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	86.1%	(.f64 (acos.f64 (fma.f64 (.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi1)) (cos.f64 phi2) (+.f64 (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	57.9%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (-.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) lambda1))) (cos.f64 lambda2)) (.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) lambda1))) (sin.f64 lambda2)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	57.8%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (cos.f64 lambda2)) (.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	93.7%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) (cos.f64 lambda1)) (.f64 (sin.f64 (+.f64 lambda2 #s(literal 0 binary64))) (sin.f64 lambda1)))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
✓	78.9%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
	49.4%	(.f64 (acos.f64 (fma.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1) (+.f64 (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	78.9%	(.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	45.2%	(.f64 (acos.f64 (fma.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi1) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) R)
✓	93.7%	(.f64 (acos.f64 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) R)
	39.0%	(.f64 (acos.f64 (/.f64 (+.f64 (.f64 (.f64 (cos.f64 lambda2) (+.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi2))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi2))))) R)
	33.2%	(*.f64 (acos.f64 (/.f64 (+.f64 (cos.f64 (+.f64 phi1 (-.f64 lambda2 lambda1))) (cos.f64 (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) R)
	45.6%	(*.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
	41.7%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 (*.f64 #s(literal 4 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 0 binary64))))) R)
	60.4%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R)
	78.7%	(.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 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 1 binary64)))))) R)
	45.7%	(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
	11.5%	(.f64 (acos.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) (-.f64 (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))))))))))) R)
	60.4%	(.f64 (acos.f64 (-.f64 (-.f64 (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 2 binary64) (cos.f64 (-.f64 phi1 phi2))))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	72.1%	(.f64 (acos.f64 (-.f64 (+.f64 (+.f64 (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	72.1%	(.f64 (acos.f64 (-.f64 (+.f64 (.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (/.f64 (cos.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	20.5%	(.f64 (acos.f64 (-.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) lambda2))) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) lambda2))) (sin.f64 lambda1)))) R)
	11.1%	(.f64 (acos.f64 (-.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (/.f64 (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))))))) #s(literal -2 binary64)))) R)
	39.3%	(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	43.6%	(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))) R)
	25.9%	(.f64 (acos.f64 (-.f64 (.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal -2 binary64)))) R)
	55.3%	(.f64 (acos.f64 (+.f64 (/.f64 (sin.f64 phi1) (/.f64 #s(literal 1 binary64) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	55.2%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi2))) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	11.1%	(.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) R)
	20.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda2)) (sin.f64 lambda1)))) R)
	21.0%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1)) (sin.f64 lambda2)))) R)
	56.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi2) (sin.f64 phi1)) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi2) (cos.f64 phi1))))) R)
	43.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi2 lambda2)) (cos.f64 (-.f64 phi2 lambda2))) (cos.f64 phi1)) #s(literal 2 binary64)))) R)
	93.7%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	93.7%	(.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)
	50.1%	(.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)
	24.4%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (.f64 (.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 lambda2) #s(literal -1/2 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (sin.f64 lambda2)) (/.f64 (cos.f64 lambda2) lambda1)) lambda1)))))) R)
✓	78.9%	(.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)
✓	55.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) R)
	32.2%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) R)
	29.3%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))) R)
	30.8%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 phi1)))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R)
	15.9%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (cos.f64 (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))) (*.f64 (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (sin.f64 (+.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) lambda1) lambda2))))) R)
	29.9%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) (cos.f64 lambda1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) R)
	25.8%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) (cos.f64 lambda1)) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (sin.f64 (/.f64 (-.f64 lambda2 (+.f64 lambda1 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (-.f64 lambda2 (-.f64 lambda1 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)))) #s(literal 2 binary64))))) R)
	15.1%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 (+.f64 lambda2 #s(literal 0 binary64))) #s(literal 1 binary64)) (*.f64 (sin.f64 (+.f64 lambda2 #s(literal 0 binary64))) (sin.f64 lambda1)))) R)
	41.8%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi2) #s(literal 1/2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))))) R)
	47.5%	(.f64 (acos.f64 (+.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)))) R)
	23.4%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 phi1 (sin.f64 phi2)))) R)
	25.9%	(.f64 (acos.f64 (+.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi1)) (*.f64 phi2 (sin.f64 phi1)))) R)
	37.2%	(.f64 (acos.f64 (+.f64 (.f64 phi2 (sin.f64 phi1)) (.f64 (+.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 1 binary64)) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) R)
✓	12.0%	(.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (.f64 lambda2 (sin.f64 lambda1)))) R)
	2.8%	(.f64 (acos.f64 (+.f64 (cos.f64 lambda1) (.f64 lambda1 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) lambda2)))) R)
	1.8%	(.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 (+.f64 lambda2 (*.f64 lambda1 #s(literal -1/2 binary64)))))) R)
	1.9%	(.f64 (acos.f64 (+.f64 #s(literal 1 binary64) (.f64 lambda1 lambda2))) R)
	17.4%	(.f64 (acos.f64 (.f64 (+.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 (.f64 phi1 phi1) #s(literal -1/720 binary64))))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	17.4%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi1 phi1) #s(literal 1/24 binary64))))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	17.3%	(.f64 (acos.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1))) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	49.3%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) R)
	23.4%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (cos.f64 lambda2) (.f64 lambda1 (+.f64 (sin.f64 lambda2) (.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 lambda2)))))))) R)
	41.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	54.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)
	54.0%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R)
	26.9%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (.f64 lambda2 (+.f64 (sin.f64 lambda1) (.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda1) lambda2))))))) R)
✓	27.7%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))) R)
✓	45.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R)
	31.8%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R)
	33.1%	(.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R)
	30.0%	(.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R)
	13.3%	(.f64 (acos.f64 (.f64 lambda2 (sin.f64 lambda1))) R)
	33.4%	(.f64 (acos.f64 (.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 (+.f64 (-.f64 lambda2 lambda1) (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 (-.f64 lambda2 lambda1) (-.f64 phi1 (+.f64 phi1 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) #s(literal 2 binary64)))) R)
	11.4%	(.f64 (acos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 lambda1 (-.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)))))))))) R)
	10.3%	(.f64 (acos.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (cos.f64 lambda2) (.f64 (cos.f64 phi2) (cos.f64 phi1))) (.f64 lambda1 lambda1)))) R)
	15.9%	(*.f64 (acos.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 lambda1 lambda2)))) R)
✓	25.7%	(*.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R)
	20.0%	(.f64 (acos.f64 (cos.f64 (.f64 lambda2 (+.f64 #s(literal -1 binary64) (/.f64 lambda1 lambda2))))) R)
	19.0%	(.f64 (acos.f64 (cos.f64 (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))))) R)
	17.7%	(*.f64 (acos.f64 (cos.f64 phi1)) R)
	16.3%	(*.f64 (acos.f64 (cos.f64 lambda2)) R)
	16.2%	(*.f64 (acos.f64 (cos.f64 lambda1)) R)
	3.8%	(*.f64 (acos.f64 #s(literal 1 binary64)) R)
✓	3.0%	(*.f64 lambda1 R)

Compiler

Compiled 5677 to 2592 computations (54.3% saved)

regimes513.0ms (2%)

Counts

150 → 2

Calls

Call 1

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

Outputs

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

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

Calls

10 calls:

75.0ms	(.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)
49.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.0ms	phi2
44.0ms	(cos.f64 (-.f64 lambda1 lambda2))
44.0ms	lambda1

Results

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

Compiler

Compiled 114 to 86 computations (24.6% saved)

regimes198.0ms (0.8%)

Counts

146 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

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

49.0ms

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

44.0ms

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

Results

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

regimes163.0ms (0.6%)

Counts

143 → 2

Calls

Call 1

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

Calls

3 calls:

43.0ms

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

41.0ms

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

41.0ms

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

Results

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

regimes181.0ms (0.7%)

Counts

137 → 2

Calls

Call 1

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

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

42.0ms

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

36.0ms

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

Results

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

regimes429.0ms (1.7%)

Counts

130 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

10 calls:

61.0ms	(acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.0ms	lambda2
38.0ms	R
38.0ms	phi1
37.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

Accuracy	Segments	Branch
78.9%	1	`R`
81.1%	2	`lambda1`
78.9%	1	`lambda2`
86.5%	3	`phi1`
87.2%	3	`phi2`
78.9%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
78.9%	1	`(-.f64 lambda1 lambda2)`
82.0%	2	`(+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))`
82.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)`
82.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)

regimes391.0ms (1.5%)

Counts

113 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

354.0ms

phi2

Results

Accuracy	Segments	Branch
87.1%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes61.0ms (0.2%)

Counts

109 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

33.0ms

phi2

Results

Accuracy	Segments	Branch
87.1%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes114.0ms (0.5%)

Counts

107 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

34.0ms

phi2

Results

Accuracy	Segments	Branch
87.1%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes50.0ms (0.2%)

Counts

99 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

29.0ms

phi2

Results

Accuracy	Segments	Branch
87.1%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes50.0ms (0.2%)

Counts

93 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

30.0ms

phi2

Results

Accuracy	Segments	Branch
87.1%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes48.0ms (0.2%)

Counts

92 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

29.0ms

phi2

Results

Accuracy	Segments	Branch
87.0%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes43.0ms (0.2%)

Counts

90 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

26.0ms

phi2

Results

Accuracy	Segments	Branch
87.0%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes229.0ms (0.9%)

Counts

81 → 3

Calls

Call 1

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

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

Calls

7 calls:

58.0ms	R
27.0ms	phi2
26.0ms	lambda1
26.0ms	(cos.f64 (-.f64 lambda1 lambda2))
25.0ms	lambda2

Results

Accuracy	Segments	Branch
65.2%	3	`R`
67.4%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
69.7%	3	`(-.f64 lambda1 lambda2)`
78.4%	2	`lambda2`
80.7%	3	`lambda1`
77.8%	4	`phi1`
79.1%	4	`phi2`

Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes90.0ms (0.4%)

Counts

79 → 4

Calls

Call 1

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

Calls

3 calls:

26.0ms	lambda1
24.0ms	phi2
23.0ms	lambda2

Results

Accuracy	Segments	Branch
79.0%	4	`phi2`
74.4%	2	`lambda2`
69.1%	3	`lambda1`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes117.0ms (0.5%)

Counts

78 → 3

Calls

Call 1

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

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

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

Calls

3 calls:

50.0ms	lambda2
25.0ms	phi2
24.0ms	phi1

Results

Accuracy	Segments	Branch
62.5%	2	`lambda2`
73.5%	3	`phi1`
73.7%	3	`phi2`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes64.0ms (0.3%)

Counts

75 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

24.0ms	phi2
23.0ms	phi1

Results

Accuracy	Segments	Branch
66.4%	3	`phi1`
70.2%	3	`phi2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes119.0ms (0.5%)

Counts

74 → 2

Calls

Call 1

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

Outputs

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

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

Calls

4 calls:

36.0ms	phi2
30.0ms	lambda1
22.0ms	(-.f64 lambda1 lambda2)
20.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

Accuracy	Segments	Branch
67.4%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
62.0%	2	`lambda1`
67.4%	2	`(-.f64 lambda1 lambda2)`
60.4%	1	`phi2`

Compiler

Compiled 29 to 23 computations (20.7% saved)

regimes129.0ms (0.5%)

Counts

60 → 2

Calls

Call 1

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

Outputs

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

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

Calls

6 calls:

23.0ms	lambda1
19.0ms	(-.f64 lambda1 lambda2)
19.0ms	phi1
19.0ms	(cos.f64 (-.f64 lambda1 lambda2))
19.0ms	lambda2

Results

Accuracy	Segments	Branch
62.0%	2	`lambda1`
60.4%	1	`lambda2`
60.4%	1	`R`
60.4%	1	`phi1`
60.4%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
60.4%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 41 to 33 computations (19.5% saved)

regimes42.0ms (0.2%)

Counts

57 → 1

Calls

Call 1

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

Outputs

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

Calls

2 calls:

18.0ms	lambda1
16.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
60.4%	1	`(-.f64 lambda1 lambda2)`
60.4%	1	`lambda1`

Compiler

Compiled 14 to 11 computations (21.4% saved)

regimes119.0ms (0.5%)

Counts

52 → 2

Calls

Call 1

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

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

7 calls:

21.0ms	(-.f64 lambda1 lambda2)
16.0ms	R
16.0ms	lambda2
16.0ms	phi2
15.0ms	(cos.f64 (-.f64 lambda1 lambda2))

Results

Accuracy	Segments	Branch
60.5%	2	`phi2`
60.2%	2	`phi1`
45.8%	1	`R`
45.8%	1	`lambda2`
45.8%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
48.4%	2	`lambda1`
45.8%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes20.0ms (0.1%)

Counts

28 → 2

Calls

Call 1

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

Calls

2 calls:

8.0ms	phi2
8.0ms	phi1

Results

Accuracy	Segments	Branch
51.2%	2	`phi1`
56.0%	2	`phi2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes64.0ms (0.3%)

Counts

27 → 3

Calls

Call 1

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
46.7%	2	`lambda2`
35.0%	2	`(-.f64 lambda1 lambda2)`
33.1%	1	`(cos.f64 (-.f64 lambda1 lambda2))`
38.2%	3	`R`
48.3%	3	`lambda1`
45.2%	2	`phi1`
45.0%	2	`phi2`

Compiler

Compiled 47 to 38 computations (19.1% saved)

regimes19.0ms (0.1%)

Counts

26 → 2

Calls

Call 1

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

Calls

2 calls:

9.0ms	lambda2
8.0ms	lambda1

Results

Accuracy	Segments	Branch
46.7%	2	`lambda2`
44.5%	2	`lambda1`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes36.0ms (0.1%)

Counts

25 → 2

Calls

Call 1

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

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

Calls

4 calls:

9.0ms	phi1
9.0ms	lambda1
8.0ms	phi2
8.0ms	lambda2

Results

Accuracy	Segments	Branch
37.1%	2	`lambda1`
37.0%	2	`phi2`
37.4%	2	`phi1`
33.1%	2	`lambda2`

Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes53.0ms (0.2%)

Counts

24 → 2

Calls

Call 1

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

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

Calls

6 calls:

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

Results

Accuracy	Segments	Branch
33.1%	2	`(cos.f64 (-.f64 lambda1 lambda2))`
33.2%	2	`(-.f64 lambda1 lambda2)`
25.7%	1	`R`
25.7%	1	`phi2`
29.4%	3	`lambda1`
32.8%	2	`phi1`

Compiler

Compiled 41 to 33 computations (19.5% saved)

regimes20.0ms (0.1%)

Counts

12 → 3

Calls

Call 1

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

4 calls:

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

Results

Accuracy	Segments	Branch
29.3%	3	`lambda1`
26.0%	2	`phi1`
26.3%	2	`lambda2`
25.4%	3	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 26 to 21 computations (19.2% saved)

regimes23.0ms (0.1%)

Counts

11 → 2

Calls

Call 1

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

5 calls:

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

Results

Accuracy	Segments	Branch
16.3%	1	`phi1`
25.6%	2	`lambda2`
18.6%	2	`R`
16.3%	1	`phi2`
25.6%	2	`lambda1`

Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes13.0ms (0.1%)

Counts

10 → 2

Calls

Call 1

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

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

Calls

3 calls:

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

Results

Accuracy	Segments	Branch
20.4%	2	`(-.f64 lambda1 lambda2)`
16.2%	1	`lambda2`
20.1%	2	`lambda1`

Compiler

Compiled 20 to 16 computations (20% saved)

regimes23.0ms (0.1%)

Counts

9 → 1

Calls

Call 1

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

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

Calls

6 calls:

5.0ms	phi2
4.0ms	lambda1
3.0ms	R
3.0ms	lambda2
3.0ms	(-.f64 lambda1 lambda2)

Results

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

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes8.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:

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

Results

Accuracy	Segments	Branch
3.0%	1	`phi1`
3.0%	1	`lambda1`
3.0%	1	`lambda2`
3.0%	1	`phi2`
3.0%	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.024442554346182886

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch2.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	0.024442554346182886

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch2.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	0.024442554346182886

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch2.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	0.024442554346182886

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch158.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
89.0ms	0.05153405420728693	130042681.0106468
60.0ms	-9.989683188286542e-82	-3.8591557706563054e-84

Results

98.0ms	195×	1	valid
17.0ms	77×	0	valid

Compiler

Compiled 980 to 709 computations (27.7% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch127.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
49.0ms	7.50047608602139e-11	6.831323675390972e-9
69.0ms	-9.989683188286542e-82	-3.8591557706563054e-84

Results

97.0ms	188×	1	valid
12.0ms	52×	0	valid

Compiler

Compiled 786 to 575 computations (26.8% saved)

Precisions

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

ival-cos: 32.0ms (36.9% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch166.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
57.0ms	7.50047608602139e-11	6.831323675390972e-9
100.0ms	-9.989683188286542e-82	-3.8591557706563054e-84

Results

104.0ms	197×	1	valid
9.0ms	43×	0	valid

Compiler

Compiled 821 to 610 computations (25.7% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch128.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
52.0ms	7.50047608602139e-11	6.831323675390972e-9
68.0ms	-9.989683188286542e-82	-3.8591557706563054e-84

Results

101.0ms	198×	1	valid
10.0ms	42×	0	valid

Compiler

Compiled 836 to 625 computations (25.2% saved)

Precisions

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

ival-cos: 32.0ms (35.8% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch205.0ms (0.8%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
89.0ms	7.50047608602139e-11	6.831323675390972e-9
108.0ms	-2.3009598489360274e-14	-4.4356361679882614e-26

Results

174.0ms	215×	1	valid
12.0ms	57×	0	valid

Compiler

Compiled 916 to 687 computations (25% saved)

Precisions

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

ival-sin: 59.0ms (45.6% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch179.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
65.0ms	7.50047608602139e-11	6.831323675390972e-9
88.0ms	-2.3009598489360274e-14	-4.4356361679882614e-26

Results

130.0ms	213×	1	valid
12.0ms	59×	0	valid

Compiler

Compiled 888 to 659 computations (25.8% saved)

Precisions

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

ival-cos: 44.0ms (37.5% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch158.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
52.0ms	7.50047608602139e-11	6.831323675390972e-9
99.0ms	-2.3009598489360274e-14	-4.4356361679882614e-26

Results

123.0ms	206×	1	valid
15.0ms	66×	0	valid

Compiler

Compiled 888 to 649 computations (26.9% saved)

Precisions

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

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

ival-sin: 39.0ms (34.4% of total)

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch154.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
62.0ms	7.50047608602139e-11	6.831323675390972e-9
84.0ms	-2.3009598489360274e-14	-4.4356361679882614e-26

Results

123.0ms	217×	1	valid
11.0ms	55×	0	valid

Compiler

Compiled 848 to 619 computations (27% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch160.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
70.0ms	1287702294262.419	14140672526343436000.0
83.0ms	-0.005319742205601301	-2.465829375167057e-6

Results

84.0ms	152×	1	valid
27.0ms	120×	0	valid

Compiler

Compiled 814 to 602 computations (26% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch356.0ms (1.4%)

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
14.0ms	3.4091100720419028e+218	3.540111165138468e+218
264.0ms	1.4376859964244493e-8	0.05153405420728693
69.0ms	-1.890976411493953e-5	-2.3009598489360274e-14

Results

316.0ms	245×	1	valid
19.0ms	59×	0	valid

Compiler

Compiled 906 to 670 computations (26% saved)

Precisions

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

ival-cos: 235.0ms (77.5% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch145.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
68.0ms	1.4376859964244493e-8	0.05153405420728693
69.0ms	-1.890976411493953e-5	-2.3009598489360274e-14

Results

112.0ms	223×	1	valid
13.0ms	65×	0	valid

Compiler

Compiled 833 to 618 computations (25.8% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch173.0ms (0.7%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
75.0ms	0.05153405420728693	130042681.0106468
90.0ms	-1.890976411493953e-5	-2.3009598489360274e-14

Results

133.0ms	219×	1	valid
20.0ms	69×	0	valid

Compiler

Compiled 770 to 573 computations (25.6% saved)

Precisions

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

ival-sin: 49.0ms (38.3% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch1.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-1.0099162951541391e-7	-2.2705144543299704e-9

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch81.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
77.0ms	1.3207149552305373e-11	1287702294262.419

Results

44.0ms	79×	1	valid
26.0ms	97×	0	valid

Compiler

Compiled 593 to 453 computations (23.6% saved)

Precisions

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

ival-cos: 24.0ms (42.8% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch82.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
79.0ms	130042681.0106468	1596030482.5854678

Results

68.0ms	63×	1	valid
8.0ms	33×	0	valid

Compiler

Compiled 224 to 168 computations (25% saved)

Precisions

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

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

ival-acos: 23.0ms (34% of total)

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch81.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
76.0ms	0.05153405420728693	130042681.0106468

Results

62.0ms	107×	1	valid
9.0ms	37×	0	valid

Compiler

Compiled 302 to 231 computations (23.5% saved)

Precisions

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

ival-cos: 22.0ms (41.4% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch162.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
92.0ms	1.2469395502656454e-275	6.432144625376729e-268
62.0ms	-0.005319742205601301	-2.465829375167057e-6

Results

99.0ms	153×	1	valid
41.0ms	118×	0	valid
3.0ms	1×	2	valid

Compiler

Compiled 508 to 398 computations (21.7% saved)

Precisions

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

ival-cos: 58.0ms (47.9% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch54.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
51.0ms	5.937711004835977e-6	0.0003716883654453463

Results

33.0ms	57×	1	valid
14.0ms	55×	0	valid

Compiler

Compiled 228 to 178 computations (21.9% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch72.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
66.0ms	-0.015073014455324914	-1.6155225280172547e-11

Results

52.0ms	99×	1	valid
9.0ms	45×	0	valid

Compiler

Compiled 257 to 204 computations (20.6% saved)

Precisions

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

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

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

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

ival-acos: 4.0ms (8.2% 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)

bsearch0.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-0.029609748647402304	-0.014965032537303772

Compiler

Compiled 32 to 24 computations (25% saved)

bsearch101.0ms (0.4%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
63.0ms	-7.745717872327502e-222	-6.293295810340658e-226
33.0ms	-0.029609748647402304	-0.012977602383315301

Results

60.0ms	105×	1	valid
28.0ms	103×	0	valid

Compiler

Compiled 318 to 258 computations (18.9% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch89.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
86.0ms	-0.005319742205601301	-2.465829375167057e-6

Results

68.0ms	68×	1	valid
13.0ms	60×	0	valid

Compiler

Compiled 208 to 168 computations (19.2% saved)

Precisions

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

ival-mult: 37.0ms (51.8% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch0.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-120153386.10415544	-212.28421947366328

Compiler

Compiled 32 to 24 computations (25% saved)

simplify32.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

140×	`*-commutative_binary64`
54×	`+-commutative_binary64`
20×	`sub-neg_binary64`
12×	`neg-sub0_binary64`
12×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	247	1300
1	350	1300
2	370	1300
3	381	1300
4	386	1300

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 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) 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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R))) (if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 phi2 (sin.f64 phi1)))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R))) (if (<=.f64 phi2 #s(literal 8897694032363671/38685626227668133590597632 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R))) (if (<=.f64 phi2 #s(literal 7350268983256945/38685626227668133590597632 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R))) (if (<=.f64 phi2 #s(literal 6189700196426901/77371252455336267181195264 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)))
(if (<=.f64 phi2 #s(literal -9000319261620429/633825300114114700748351602688 binary64)) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R) (if (<=.f64 phi2 #s(literal 3713820117856141/38685626227668133590597632 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 binary64)) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R) (if (<=.f64 phi2 #s(literal 8897694032363671/77371252455336267181195264 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 6189700196426901/77371252455336267181195264 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 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 phi2 #s(literal 4593918114535591/1208925819614629174706176 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 lambda1 #s(literal -2597301565578305/590295810358705651712 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 lambda1 #s(literal 1300000000000 binary64)) (.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 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -4004566777473459/37778931862957161709568 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 4722366482869645/590295810358705651712 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (if (<=.f64 phi2 #s(literal 345000000000000013820218045762237266154185139466659487426393852584289724620106887628604435915231167571635760426482071781261261929435276979296033092317526018214977382824412254132980163815661972198511433693230269489741824 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 lambda1)))) R))))
(if (<=.f64 phi2 #s(literal -2508757194024499/147573952589676412928 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) R) (if (<=.f64 phi2 #s(literal 2176715800697727/73786976294838206464 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -8854437155380585/590295810358705651712 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) R) (if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -944473296573929/9444732965739290427392 binary64)) (.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) R))
(if (<=.f64 lambda1 #s(literal 4447304632028365/1125899906842624 binary64)) (.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R))
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R)
(if (<=.f64 phi2 #s(literal 132000000 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 7493989779944505/144115188075855872 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R))
(if (<=.f64 lambda1 #s(literal -2508757194024499/147573952589676412928 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (if (<=.f64 lambda1 #s(literal 7065352658264999/2436328502849999770088345596968797077719056714398751881716976614303237172691606525616403766470502564806326229057852167045864792466300773511644496824078163354882819424989118257467697413872513412088199898369804594718421399481348718736436590903867241403206934700776069386770457147497978527744 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R) (.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R)))
(if (<=.f64 lambda2 #s(literal 1936908127739503/18446744073709551616 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R))
(if (<=.f64 phi1 #s(literal -4496393867966703/1152921504606846976 binary64)) (.f64 (acos.f64 (cos.f64 phi1)) R) (.f64 (acos.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -5764607523034235/288230376151711744 binary64)) (.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (.f64 (acos.f64 (cos.f64 phi1)) R))
(if (<=.f64 lambda1 #s(literal -1116892707587883/72057594037927936 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (if (<=.f64 lambda1 #s(literal -8543393492127313/104187725513747723032497684230019653080386848786186065006191528308813081840900501117522378138618035792858279853022394381967012525845615079380677438317669219470236837179906477475985598217372094136390078377123228155963917938085569707674435584 binary64)) (.f64 (acos.f64 (cos.f64 phi1)) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R)))
(if (<=.f64 lambda1 #s(literal -3423715700080493/1180591620717411303424 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (acos.f64 (cos.f64 lambda2)) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -100000000 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (-.f64 lambda2 lambda1) R))
(*.f64 (-.f64 lambda2 lambda1) 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 (fma.f64 (cos.f64 lambda2) (.f64 (cos.f64 lambda1) (.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (sin.f64 lambda2)))) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))) 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 (fma.f64 (cos.f64 lambda2) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (sin.f64 lambda1) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.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 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.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 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R))) (if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (.f64 phi2 (sin.f64 phi1)))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) (.f64 (sin.f64 phi1) phi2)))) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R))) (if (<=.f64 phi2 #s(literal 8897694032363671/38685626227668133590597632 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R)))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (if (<=.f64 phi2 #s(literal 8897694032363671/38685626227668133590597632 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 R (acos.f64 (fma.f64 (sin.f64 phi2) (sin.f64 phi1) (.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R))) (if (<=.f64 phi2 #s(literal 7350268983256945/38685626227668133590597632 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (if (<=.f64 phi2 #s(literal 7350268983256945/38685626227668133590597632 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (+.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) R) (neg.f64 (.f64 (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))) R))) (if (<=.f64 phi2 #s(literal 6189700196426901/77371252455336267181195264 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)))
(if (<=.f64 phi2 #s(literal -2114627165561701/2135987035920910082395021706169552114602704522356652769947041607822219725780640550022962086936576 binary64)) (-.f64 (.f64 R (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 R (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (if (<=.f64 phi2 #s(literal 6189700196426901/77371252455336267181195264 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(if (<=.f64 phi2 #s(literal -9000319261620429/633825300114114700748351602688 binary64)) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R) (if (<=.f64 phi2 #s(literal 3713820117856141/38685626227668133590597632 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))) R)))
(if (<=.f64 phi2 #s(literal -9000319261620429/633825300114114700748351602688 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (if (<=.f64 phi2 #s(literal 3713820117856141/38685626227668133590597632 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 binary64)) (.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2))))))) R) (if (<=.f64 phi2 #s(literal 8897694032363671/77371252455336267181195264 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 binary64)) (.f64 R (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (asin.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi1) (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda1 lambda2)))))))) (if (<=.f64 phi2 #s(literal 8897694032363671/77371252455336267181195264 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 binary64)) (.f64 (acos.f64 (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2)))) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R) (if (<=.f64 phi2 #s(literal 6189700196426901/77371252455336267181195264 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sin.f64 phi1) (sin.f64 phi2))))))) (if (<=.f64 phi2 #s(literal 6189700196426901/77371252455336267181195264 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 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 phi2 #s(literal 4593918114535591/1208925819614629174706176 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -7288990951312319/316912650057057350374175801344 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 phi2 #s(literal 4593918114535591/1208925819614629174706176 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) R)))
(if (<=.f64 lambda1 #s(literal -2597301565578305/590295810358705651712 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 lambda1 #s(literal 1300000000000 binary64)) (.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 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)))
(if (<=.f64 lambda1 #s(literal -2597301565578305/590295810358705651712 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 lambda1 #s(literal 1300000000000 binary64)) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -4004566777473459/37778931862957161709568 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 4722366482869645/590295810358705651712 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (if (<=.f64 phi2 #s(literal 345000000000000013820218045762237266154185139466659487426393852584289724620106887628604435915231167571635760426482071781261261929435276979296033092317526018214977382824412254132980163815661972198511433693230269489741824 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 lambda1)))) R))))
(if (<=.f64 phi2 #s(literal -4004566777473459/37778931862957161709568 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 4722366482869645/590295810358705651712 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (if (<=.f64 phi2 #s(literal 345000000000000013820218045762237266154185139466659487426393852584289724620106887628604435915231167571635760426482071781261261929435276979296033092317526018214977382824412254132980163815661972198511433693230269489741824 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (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 lambda1))))))))
(if (<=.f64 phi2 #s(literal -2508757194024499/147573952589676412928 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) R) (if (<=.f64 phi2 #s(literal 2176715800697727/73786976294838206464 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) R)))
(if (<=.f64 phi2 #s(literal -2508757194024499/147573952589676412928 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 2176715800697727/73786976294838206464 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -8854437155380585/590295810358705651712 binary64)) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (.f64 (cos.f64 phi2) (cos.f64 phi1)))) R) (if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) R) (.f64 (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))) R)))
(if (<=.f64 phi2 #s(literal -8854437155380585/590295810358705651712 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 7493989779944505/144115188075855872 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))) (.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -944473296573929/9444732965739290427392 binary64)) (.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -944473296573929/9444732965739290427392 binary64)) (.f64 R (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64))))))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(if (<=.f64 lambda1 #s(literal 4447304632028365/1125899906842624 binary64)) (.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R) (.f64 (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) R))
(if (<=.f64 lambda1 #s(literal 4447304632028365/1125899906842624 binary64)) (.f64 R (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64))))))))) (.f64 R (acos.f64 (+.f64 (.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(.f64 (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))) R)
(.f64 R (acos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 (cos.f64 (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)))))))))
(if (<=.f64 phi2 #s(literal 132000000 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 132000000 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) R) (.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R))
(if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(if (<=.f64 lambda1 #s(literal -2508757194024499/147573952589676412928 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (if (<=.f64 lambda1 #s(literal 7065352658264999/2436328502849999770088345596968797077719056714398751881716976614303237172691606525616403766470502564806326229057852167045864792466300773511644496824078163354882819424989118257467697413872513412088199898369804594718421399481348718736436590903867241403206934700776069386770457147497978527744 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2))) R) (.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R)))
(if (<=.f64 lambda1 #s(literal -2508757194024499/147573952589676412928 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (if (<=.f64 lambda1 #s(literal 7065352658264999/2436328502849999770088345596968797077719056714398751881716976614303237172691606525616403766470502564806326229057852167045864792466300773511644496824078163354882819424989118257467697413872513412088199898369804594718421399481348718736436590903867241403206934700776069386770457147497978527744 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda2)))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2))))))
(if (<=.f64 lambda2 #s(literal 1936908127739503/18446744073709551616 binary64)) (.f64 (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1))) R) (.f64 (acos.f64 (.f64 (cos.f64 lambda2) (cos.f64 phi2))) R))
(if (<=.f64 lambda2 #s(literal 1936908127739503/18446744073709551616 binary64)) (.f64 R (acos.f64 (.f64 (cos.f64 phi1) (cos.f64 lambda1)))) (.f64 R (acos.f64 (.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(if (<=.f64 phi1 #s(literal -4496393867966703/1152921504606846976 binary64)) (.f64 (acos.f64 (cos.f64 phi1)) R) (.f64 (acos.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) R))
(if (<=.f64 phi1 #s(literal -4496393867966703/1152921504606846976 binary64)) (.f64 R (acos.f64 (cos.f64 phi1))) (.f64 R (acos.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -5764607523034235/288230376151711744 binary64)) (.f64 (acos.f64 (cos.f64 (-.f64 lambda1 lambda2))) R) (.f64 (acos.f64 (cos.f64 phi1)) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -5764607523034235/288230376151711744 binary64)) (.f64 R (acos.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (.f64 R (acos.f64 (cos.f64 phi1))))
(if (<=.f64 lambda1 #s(literal -1116892707587883/72057594037927936 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (if (<=.f64 lambda1 #s(literal -8543393492127313/104187725513747723032497684230019653080386848786186065006191528308813081840900501117522378138618035792858279853022394381967012525845615079380677438317669219470236837179906477475985598217372094136390078377123228155963917938085569707674435584 binary64)) (.f64 (acos.f64 (cos.f64 phi1)) R) (*.f64 (acos.f64 (cos.f64 lambda2)) R)))
(if (<=.f64 lambda1 #s(literal -1116892707587883/72057594037927936 binary64)) (.f64 R (acos.f64 (cos.f64 lambda1))) (if (<=.f64 lambda1 #s(literal -8543393492127313/104187725513747723032497684230019653080386848786186065006191528308813081840900501117522378138618035792858279853022394381967012525845615079380677438317669219470236837179906477475985598217372094136390078377123228155963917938085569707674435584 binary64)) (.f64 R (acos.f64 (cos.f64 phi1))) (*.f64 R (acos.f64 (cos.f64 lambda2)))))
(if (<=.f64 lambda1 #s(literal -3423715700080493/1180591620717411303424 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (acos.f64 (cos.f64 lambda2)) R))
(if (<=.f64 lambda1 #s(literal -3423715700080493/1180591620717411303424 binary64)) (.f64 R (acos.f64 (cos.f64 lambda1))) (.f64 R (acos.f64 (cos.f64 lambda2))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -100000000 binary64)) (.f64 (acos.f64 (cos.f64 lambda1)) R) (.f64 (-.f64 lambda2 lambda1) R))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -100000000 binary64)) (.f64 R (acos.f64 (cos.f64 lambda1))) (.f64 (-.f64 lambda2 lambda1) R))
(*.f64 (-.f64 lambda2 lambda1) R)
(*.f64 lambda1 R)

soundness3.3s (12.9%)

Rules

5506×	`+-lowering-+.f64`
5506×	`+-lowering-+.f32`
5406×	`-lowering-.f32`
5406×	`-lowering-.f64`
5198×	`-lowering-.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	48	311
1	162	305
2	655	233
3	4357	233
0	8155	233
0	928	21340
1	3308	20587
0	8309	20587
0	52	272
1	157	193
2	681	193
3	5846	193
0	8878	193
0	61	408
1	196	357
2	818	327
3	5196	327
0	8086	327
0	183	3081
1	611	3032
2	2189	3004
3	3998	3001
0	8114	3001
0	17	58
1	47	58
2	177	58
3	1149	58
0	8315	58
0	600	13601
1	2244	13185
2	4765	13161
0	8270	13161

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 3250 to 1684 computations (48.2% saved)

preprocess567.0ms (2.2%)

Remove

(sort phi1 phi2)

(negabs R)

Compiler

Compiled 3670 to 1042 computations (71.6% 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